inherited fCompraFinalizar: TfCompraFinalizar
  Left = 340
  Top = 115
  Width = 809
  Height = 556
  Caption = 'Compras Finalizar'
  Font.Height = -13
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object GroupBox3: TGroupBox [0]
    Left = 0
    Top = 290
    Width = 617
    Height = 204
    Caption = 'PARCELAS'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clTeal
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    PopupMenu = PopupMenu1
    TabOrder = 4
    object DBGrid1: TDBGrid
      Left = 4
      Top = 19
      Width = 570
      Height = 182
      Hint = 'Grave as altera'#231#245'es em cada linha.'
      DataSource = ds_Cr
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clTeal
      TitleFont.Height = -13
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = [fsBold]
      Columns = <
        item
          Expanded = False
          FieldName = 'TITULO'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'T'#237'tulo'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VIA'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'Via'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DATAVENCIMENTO'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'Vencimento'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALORTITULO'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'R$ T'#237'tulo'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'STATUS'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'Status'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALORRECEBIDO'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'R$ Pago'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALORPAG'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'R$ Resto'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'N_DOCUMENTO'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'N'#176' doc.'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Width = 70
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CAIXA'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Title.Caption = 'Caixa'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Visible = True
        end>
    end
    object SpeedButton2: TBitBtn
      Left = 575
      Top = 17
      Width = 39
      Height = 37
      TabOrder = 1
      OnClick = SpeedButton2Click
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C02B00002E0000290000FFFCF89084808281857D80847F807C7D7F79797B
        7B848687837F84807F817C817F757A78858389857C8685747D9A828A95777C24
        00003103002B0000FFFBFB2802002E0000290000C0C0C0C0C0C0C0C0C0C0C0C0
        640000A80B0FB5030A9F050A4C000098787387797F7D797F85848081837D7A84
        7E747E7882837F807F7B8586827F807E7D7E8285858B7B7C808F787CC57B817F
        050DAD070EAD020A7300008A080FAF0C0E9C11142F0000C0C0C0C0C0C0370003
        A9070CD80000FC0810DD0C10810B06B77F7A9D8286927A82FFF8FBFFF6F3FFFD
        F8FFFFF8837D7688867E7C7C76878B86767A7B777C7F7B8382937979D5757BB2
        0F17E1000AE8020EFFE8F2B0050DDF0309BF060A3A0000C0C0C0C0C0C03A0000
        C10B0CF30201F40000DD08049C0D06CD79749D757AB57882A00913B10B127C0C
        0CFFF9F59C857D817F777E807A8086817C84837B83837B827F9B807CD37675A2
        0305E6060BE20207FFE1E3AC0E0EDD0303C00907380300C0C0C0C0C0C03B0000
        BD0000FF0F0CF80000DB0000AE0F0BDC7975A27A7CC77D83C20007DE0007A309
        0AFFF6F29B7D787E807A848680767C777880807F85847F7E7A9B7874D37471AF
        120FE10303E10301FFEEEBA10904DC0400C20B072E0000C0C0C0C0C0C02E0000
        C30D07F60000FF0403E10303AE0E0ED1726F9D7E7DB27271D01213E30505AA10
        0BFFF6F18F76747F848380817F8583827C7D817E7B7D90817FB1817FD87571A1
        0603DF0100E60905FFEFEAAC130CDB0500C00A04390000C0C0C0C0C0C02D0000
        BA0700FF0B06F40000E50608A9080AD77777A08281B27873C20504E20501A60A
        05FFF6F29981837A7F827F7D7D847F807F7D838982878E7C7DA87876DB7A77A4
        0B08E40906DA0000FFEFEAA60A04DE0803C209053B0000C0C0C0C0C0C0370000
        BB0A03F20200FF0507E20207AC0A0FD774769A7A7BBA7A79C60809E40604A308
        05FFF5F497797E8080868380827F7C7E7E798289858B8781829C7976D379789C
        0907DD0706DB0200FFEDEBAC0D09E00200C50908380000C0C0C0C0C0C0450000
        BF0A08F10000F00000E30308B20509E37478A17F80AA7C7B9C0D0AB6100B8611
        0CFFF8F59B8084817D828281838180827E7A807C787E7D7B7B987F7DC97C7993
        120FBE0501CE0A08FFE7E8B6070AEB0609C103043A0000C0C0C0C0C0C0400000
        C20306FA0404F40403E90B0BC40002FF787E9D7A7E888382A87A6FB77D71AA80
        749A7E777F72708A86857A7D7B7F818187868A868287858383947E79AB6C687A
        181296160BA70E07FFEAEECB020BEA0003CB0A0D3D0000C0C0C0C0C0C0410000
        C50309FF0608EF0000E20301D10B0C910205B1777C917C7E9E8178A08073A080
        75A6847E9E7876A27E7E9D827E937A7899797E98767C9E797BAE7E7DCF8682CC
        716AE07266FC6E67C60710D90005FA060ECA0B0E390000C0C0C0C0C0C0380000
        C3070DF90002F60000E50604BC0C069912107C151C610B136E17156C130F6F18
        166C12126E0C12700F13711717680F1270131C74121E761119710A0F7A0D0F85
        130D92160CAA0B07DD0510F2000BF70005C20709320000C0C0C0C0C0C0380000
        C1070DF30005EB0406D80A08FFE3DCFFF0EBFFEBF2FFEFF7FFEDEDFFF1EFFFED
        EEFFEEF4FFEEF7FFEFF5FFF1F1FFEFEFFFEEF7FFEBF6FFEDF7FFEEF5FFF0F0FF
        F2EEFFEDE5FFECE8CC0006E9010DF70107BD0303350000C0C0C0C0C0C0330000
        C5090EE20003BE0404FF6E6BBF100DB00D0A960F118208089B191496110A920D
        0F93121786050E860B0F87120B8C120C940C10950910950D1391121483120F8D
        1008B81009C00E09FFECEDB70206E80403C70A07370000C0C0C0C0C0C0350000
        C20409E6060CAF0B0CFF726FB10E0BFFEAE7FFF0F0FFF5F2FFEFEAFFF5F0FFF0
        EEFFF2F4FFF2F9FFF3F7FFF5F0FFF6F0FFF1F2FFF2F5FFF3F5FFF3F4FFF6F1FF
        F5F0FFEBE6B50C08FFEFEEA60808E20404C205043D0000C0C0C0C0C0C0390000
        C50609E40308AD080BF7726F96100CFFF4F0FFF9F8FFFBFCFFFCF9FFFCF9FFFD
        F9FFFDF9FFFAFEFFFAFEFFFAFCFFFBFBFFFCFBFFFCFBFFFCFBFFFBFCFFFBFCFF
        F9F8FFF4F0960E0AFFF0F0AE0B0DE20106C6070A3A0000C0C0C0C0C0C0370000
        C40709E30308AD080BF371718C110DFFF6F1FFFAFBFEFDFFFEFEFEFAFFFDF9FF
        FBFAFFFBFFFDFEFFFCFFFFFBFFFFFDFFFAFFFDF9FFFBFCFEFEFEFEFEFEFDFFFF
        FAFBFFF6F28A0F0BFFF0F0AF0A0DE10107C5070C370000C0C0C0C0C0C0300000
        C00709E10406AC090AF5717191100DFFF6F19B7C7D7E80817E808080817F8281
        7D82817D847F80847F81857E83847F8182807F80817D8080807E80807E7F839B
        7C7DFFF5F28F0E0BFFF0F0AE0B0DDF0206C1080A300000C0C0C0C0C0C0300000
        C00808E10406AA0A0AF3726F91110CFFF6F1FFFCFBFBFFFFFFFFFFFFFFFEFFFF
        FCFFFFFCFFFFFFFFFEFFFFFDFFFFFEFFFFFFFEFFFFFCFFFEFFFFFFFFFDFEFFFF
        FCFCFFF5F28F0E0BFFF0F0AC0B0DDF0206C1080A300000C0C0C0C0C0C0370000
        C40708E10406A80A0AF0736F8F110CFFF6F1FFFCFBFFFEFFFFFEFFFFFEFEFFFF
        FCFFFFFEFDFFFFFAFFFFFBFEFFFDFFFFFFFFFEFFFFFCFFFEFFFFFEFFFFFEFFFF
        FBFCFFF5F28D0F0BFFF1F0AA0C0CDF0204C50809370000C0C0C0C0C0C0390000
        C50708E30406A60A0AEE736F8A120CFFF7F1997D7D807F81857F8085807F8280
        7F80817F7C80817C7F837C7F837C808180817F82817D857F80857F80807F8399
        7D7DFFF6F288100BFFF2F0A80C0CE10204C60809390000C0C0C0C0C0C0370000
        C50708E30406A60A0AEC746F85130CFFF8F1FFFBFBFAFEFFFCFEFEFCFFFDF9FF
        FDF9FFFDFEFDFFFFFCFFFFFCFFFEFDFFF9FFFDF9FFFBFCFEFEFCFEFEFAFDFFFF
        FBFBFFF7F283110BFFF2F0A80C0DE10204C60809370000C0C0C0C0C0C0390000
        C40709E10406A8090BEC737183130DFFF7F2FFFCFCFFFEFFFFFEFFFBFFFEF6FF
        FEF6FFFEFDFFFFFFFDFFFFFDFFFDFFFFF6FFFEF6FFFCFBFFFFFFFFFFFFFEFFFF
        FCFCFFF7F281110BFFF1F1A80C0DDF0206C5080A390000C0C0C0C0C0C0420000
        C3050AD80003AA0B0FED6E6F87120DFFF6F2A27A7C8A7C80867D80817F7E7881
        7E76817E7A7F807B7E827B7E827A7F8076817E78827C817F7F867E7F8A7C82A1
        7A7CFFF6F2820D08FFF0F1AA0B0FDE0208C90B103E0000C0C0C0C0C0C0360000
        B10C0FCD0A0C9E090DF1747687100EFFF4F3FFF8FEFFFAFFFFFCFFFFFEFFFDFF
        FEFAFFFEFAFFFFF8FFFFFAFFFFFAFFFFFAFFFEFDFFFEFFFEFFFFFCFFFFFAFFFF
        F8FEFFF4F38C1513FFEAEC9E090CC70406A90407340000C0C0C0C0C0C0190000
        83100D9A0501921114E46F72840E0DFFF5F4FFF8FEFFFBFFFFFCFFFFFEFFFFFF
        FEFFFFFEFDFFFFFAFFFFFBFFFFFDFFFFFFFFFEFFFFFEFFFEFFFFFCFFFFFBFFFF
        F8FEFFF5F4891411FFF0F19515169D08048916131F0302C0C0C0C0C0C0160002
        530000760000880A0FEE7579870F10FFF3F4A4787F8B7A83847D82837E7F867E
        7E847F7E817E807D7E827F7E80817F7F847F7E867E7E837E7F847D828B7A83A4
        787FFFF1F2820A0AFFEEF28E1113700000540000130000C0C0C0C0C0C0250002
        5300007000009A1018FB71798B0A0FFFF2F6FFF8FFFFFBFFFBFEFFFAFFFFFFFF
        FEFFFFFEFFFDFFFFFDFFFFFDFFFFFEFFFFFFFEFFFFFEFAFFFFFBFEFFFFFBFFFF
        F8FFFFF3F5901113FFEDF5950B127000005300002D030AC0C0C0C0C0C0200001
        5D161370140F7D1117D86C72771717FFF7F7FFF8FFFFFCFFF7FEFFF7FFFEFEFF
        FDFFFEFDFFFDFFFFFCFFFFFDFFFFFDFEFFFEFDFEFFFDF7FFFEF7FEFFFFFCFFFF
        F8FFFFF2F270110EFFF0F3780D10721710631C18200001C0C0C0C0C0C0C0C0C0
        1703001E04002000002000001D07000E01000300040000070000050001020301
        0003010000010100010200010200010103020003020000010100000400000503
        00021105001E08001E00002000001E0400150100C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
    end
    object SpeedButton3: TBitBtn
      Left = 575
      Top = 54
      Width = 39
      Height = 37
      TabOrder = 2
      OnClick = SpeedButton3Click
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08A23F08A2
        3F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08BC5804BC5804A23F08A2
        3F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A74407C96501CC6701BC5804A2
        3F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08B24E05CC6701CC6701BC
        5804A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08B45105CC6701CC
        6701B45105A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08BC5804CC
        6701CC6701AF4C06A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08
        A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08C4
        6002CC6701C96501A74407A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08
        A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A5
        4208C76202CC6701C25D03A23F08A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        C5681AC16214BD5D0FBA5709B75305B75305B75305B75305B75305B75305B753
        05B75305B75305B75305AF4C06A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A2
        3F08AA4707C96501CC6701B75305A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        EE9B37E7902BDF841FD87914D06E08CC6701CC6701CC6701CC6701CC6701CC67
        01CC6701CC6701CC6701CC6701A54208A23F08C0C0C0C0C0C0C0C0C0C0C0C0A2
        3F08A23F08AF4C06CC6701C96501A74407A23F08A23F08C0C0C0A23F08A23F08
        F7A944F09D39E8922DE18621D97B15D26F0ACD6802CC6701CC6701CC6701CC67
        01CC6701CC6701CC6701C25D03A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0A23F08A23F08BA5604CC6701BC5804A23F08A23F08C0C0C0A23F08A23F08
        FCB04CF8AA46F19F3BE9942FE28823D77917A94609A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0A23F08A23F08A74407CC6701CC6701A74407A23F08A23F08A23F08A23F08
        FCB04CFCB04CE9983CD37A27EB9531E38A25CB6C16A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08BF5B03CC6701BA5604A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA7450CE38F33EC9733E48C27B95A11A23F08A23F08C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08B45105CC6701C25D03A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08B25313EF9E3CED9935E28928AE4D0DA23F08A23F
        08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701C96501A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C36820F6A742EE9B37E38B29AE4D0EA23F
        08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701CC6701A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08CF7729F7A844F09D39E48D2BAF4E
        0EA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701CC6701A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08A23F08DA8532F8AA46F19F3BE58F
        2DAF4E0EA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08B75305CC6701C76202A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08A23F08A23F08DA8632F9AC48F2A1
        3DE6912FB75813A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08C76202CC6701BF5B03A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0A23F08A23F08A23F08DA8633FAAD
        49F3A33EEC9733C06317A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A2
        3F08A23F08A23F08B45105CC6701CC6701B24E05A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0A23F08A23F08A23F08C469
        22FBAE4AF5A540ED9935CD721EA6440AA23F08A23F08A23F08A23F08A23F08A2
        3F08A23F08AA4707CC6701CC6701C76202A23F08A23F08C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A23F
        08B95B19F6A846F6A742EE9B36DB8225B65611A23F08A23F08A23F08A23F08A2
        3F08B45105CC6701CC6701C96501AA4707A23F08A23F08C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F
        08A23F08A8460CDA8532F7A844F09D38E8912DDD8220CC6D13C6640AC25E03C4
        6002CC6701CC6701C76202AA4707A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0A23F08A23F08A23F08B85B19DC8731F19F3AE9932FE28823DA7C17D2710BCD
        6802C76202B75305A54208A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08
        D57F2EF6A948C46922A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0A23F08A23F08A23F08A23F08A7450BBF621AC5681BC16315B7560DAB
        4808A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08
        A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08A23F08A23F08A23F08A2
        3F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
    end
  end
  object Panel4: TPanel [1]
    Left = 2
    Top = 285
    Width = 617
    Height = 209
    TabOrder = 6
    Visible = False
    object GroupBox5: TGroupBox
      Left = 1
      Top = 1
      Width = 615
      Height = 94
      Align = alTop
      TabOrder = 0
      object Label27: TLabel
        Left = 282
        Top = 8
        Width = 70
        Height = 16
        Caption = 'Pagamento'
      end
      object Label28: TLabel
        Left = 5
        Top = 8
        Width = 44
        Height = 16
        Caption = 'C'#243'digo'
      end
      object Label29: TLabel
        Left = 64
        Top = 8
        Width = 69
        Height = 16
        Caption = 'Empreiteiro'
      end
      object Label31: TLabel
        Left = 517
        Top = 8
        Width = 60
        Height = 16
        Caption = 'Valor (R$)'
      end
      object Label30: TLabel
        Left = 380
        Top = 8
        Width = 56
        Height = 16
        Caption = 'Caixa(un)'
      end
      object Label36: TLabel
        Left = 450
        Top = 8
        Width = 61
        Height = 16
        Caption = 'Pre'#231'o(R$)'
      end
      object lbl6: TLabel
        Left = 5
        Top = 49
        Width = 44
        Height = 16
        Caption = 'C'#243'digo'
      end
      object lbl7: TLabel
        Left = 62
        Top = 49
        Width = 44
        Height = 16
        Caption = 'Fretista'
      end
      object lbl8: TLabel
        Left = 282
        Top = 49
        Width = 70
        Height = 16
        Caption = 'Pagamento'
      end
      object lbl9: TLabel
        Left = 379
        Top = 50
        Width = 56
        Height = 16
        Caption = 'Caixa(un)'
      end
      object lbl10: TLabel
        Left = 446
        Top = 50
        Width = 61
        Height = 16
        Caption = 'Pre'#231'o(R$)'
      end
      object lbl11: TLabel
        Left = 518
        Top = 51
        Width = 60
        Height = 16
        Caption = 'Valor (R$)'
      end
      object dtPagColhedor: TJvDatePickerEdit
        Left = 280
        Top = 24
        Width = 95
        Height = 25
        AllowNoDate = True
        BorderStyle = bsNone
        Checked = True
        BevelKind = bkFlat
        TabOrder = 0
        OnChange = dtPagColhedorChange
        OnKeyPress = FormKeyPress
      end
      object edVlrColhedor: TJvCalcEdit
        Left = 518
        Top = 25
        Width = 83
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        DisplayFormat = ',##0.00'
        TabOrder = 3
        DecimalPlacesAlwaysShown = False
        OnChange = dtDataPagFreteChange
        OnKeyPress = FormKeyPress
      end
      object JvCalcEdit1: TJvCalcEdit
        Left = 378
        Top = 25
        Width = 67
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        DisplayFormat = ',##0'
        ShowButton = False
        TabOrder = 1
        DecimalPlacesAlwaysShown = False
        OnChange = dtDataPagFreteChange
        OnKeyPress = FormKeyPress
      end
      object edPrecoColhedor: TJvCalcEdit
        Left = 449
        Top = 25
        Width = 66
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        DisplayFormat = ',##0.00'
        ShowButton = False
        TabOrder = 2
        DecimalPlacesAlwaysShown = False
        OnChange = dtDataPagFreteChange
        OnKeyPress = edPrecoColhedorKeyPress
      end
      object CheckBox1: TCheckBox
        Left = 140
        Top = 46
        Width = 97
        Height = 17
        TabStop = False
        Caption = 'Desconto 1%'
        TabOrder = 4
        Visible = False
      end
      object dbedtID_EMPREITEIRO: TDBEdit
        Left = 5
        Top = 24
        Width = 56
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        Color = clInfoBk
        DataField = 'ID_EMPREITEIRO'
        DataSource = fCompra.DtSrc
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnExit = dbeUsuarioExit
        OnKeyPress = FormKeyPress
      end
      object dbedtEMPREITEIRO1: TDBEdit
        Left = 62
        Top = 24
        Width = 180
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        Color = clInfoBk
        DataField = 'EMPREITEIRO'
        DataSource = fCompra.DtSrc
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        OnExit = dbeUsuarioExit
        OnKeyPress = FormKeyPress
      end
      object btn1: TBitBtn
        Left = 244
        Top = 23
        Width = 31
        Height = 26
        Caption = '...'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 7
        OnClick = BtnChequeClick
      end
      object dbedtCODTRANSP: TDBEdit
        Left = 5
        Top = 64
        Width = 56
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        Color = clInfoBk
        DataField = 'CODTRANSP'
        DataSource = fCompra.DtSrc
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 8
        OnExit = dbeUsuarioExit
        OnKeyPress = FormKeyPress
      end
      object dbedtEMPREITEIRO: TDBEdit
        Left = 62
        Top = 64
        Width = 180
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        Color = clInfoBk
        DataField = 'FRETISTA'
        DataSource = fCompra.DtSrc
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 9
        OnExit = dbeUsuarioExit
        OnKeyPress = FormKeyPress
      end
      object btn2: TBitBtn
        Left = 244
        Top = 62
        Width = 31
        Height = 26
        Caption = '...'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 10
        OnClick = BtnChequeClick
      end
      object dtDataPagFrete: TJvDatePickerEdit
        Left = 280
        Top = 64
        Width = 94
        Height = 25
        AllowNoDate = True
        BorderStyle = bsNone
        Checked = True
        BevelKind = bkFlat
        TabOrder = 11
        OnChange = dtDataPagFreteChange
      end
      object JvCalcEdit2: TJvCalcEdit
        Left = 378
        Top = 65
        Width = 66
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        DisplayFormat = ',##0'
        ShowButton = False
        TabOrder = 12
        DecimalPlacesAlwaysShown = False
        OnKeyPress = FormKeyPress
      end
      object JvCalcEdit3: TJvCalcEdit
        Left = 447
        Top = 65
        Width = 68
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        DisplayFormat = ',##0.00'
        ShowButton = False
        TabOrder = 13
        DecimalPlacesAlwaysShown = False
        OnChange = dtDataPagFreteChange
        OnKeyPress = JvCalcEdit3KeyPress
      end
      object edVlrFrete: TJvCalcEdit
        Left = 518
        Top = 65
        Width = 84
        Height = 24
        BevelKind = bkFlat
        BorderStyle = bsNone
        DisplayFormat = ',##0.00'
        TabOrder = 14
        DecimalPlacesAlwaysShown = False
        OnChange = dtDataPagFreteChange
        OnKeyPress = FormKeyPress
      end
    end
    object JvDBGrid1: TJvDBGrid
      Left = 1
      Top = 92
      Width = 575
      Height = 114
      BorderStyle = bsNone
      DataSource = ds_Cr
      Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      BevelKind = bkFlat
      AutoSizeColumns = True
      SelectColumnsDialogStrings.Caption = 'Select columns'
      SelectColumnsDialogStrings.OK = '&OK'
      SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
      EditControls = <>
      RowsHeight = 20
      TitleRowHeight = 20
      Columns = <
        item
          Expanded = False
          FieldName = 'TITULO'
          Title.Caption = 'T'#237'tulo'
          Width = 63
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VIA'
          Title.Caption = 'Via'
          Width = 25
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'STATUS'
          Title.Caption = 'Status'
          Width = 122
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DATAVENCIMENTO'
          Title.Caption = 'Vencimento'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALORTITULO'
          Title.Caption = 'Valor T'#237'tulo R$'
          Width = 97
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DATAPAGAMENTO'
          Title.Caption = 'Pagamento'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'VALORPAG'
          Title.Caption = 'Valor Pago R$'
          Width = 97
          Visible = True
        end>
    end
    object btn3: TBitBtn
      Left = 577
      Top = 96
      Width = 39
      Height = 37
      TabOrder = 2
      OnClick = SpeedButton2Click
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C02B00002E0000290000FFFCF89084808281857D80847F807C7D7F79797B
        7B848687837F84807F817C817F757A78858389857C8685747D9A828A95777C24
        00003103002B0000FFFBFB2802002E0000290000C0C0C0C0C0C0C0C0C0C0C0C0
        640000A80B0FB5030A9F050A4C000098787387797F7D797F85848081837D7A84
        7E747E7882837F807F7B8586827F807E7D7E8285858B7B7C808F787CC57B817F
        050DAD070EAD020A7300008A080FAF0C0E9C11142F0000C0C0C0C0C0C0370003
        A9070CD80000FC0810DD0C10810B06B77F7A9D8286927A82FFF8FBFFF6F3FFFD
        F8FFFFF8837D7688867E7C7C76878B86767A7B777C7F7B8382937979D5757BB2
        0F17E1000AE8020EFFE8F2B0050DDF0309BF060A3A0000C0C0C0C0C0C03A0000
        C10B0CF30201F40000DD08049C0D06CD79749D757AB57882A00913B10B127C0C
        0CFFF9F59C857D817F777E807A8086817C84837B83837B827F9B807CD37675A2
        0305E6060BE20207FFE1E3AC0E0EDD0303C00907380300C0C0C0C0C0C03B0000
        BD0000FF0F0CF80000DB0000AE0F0BDC7975A27A7CC77D83C20007DE0007A309
        0AFFF6F29B7D787E807A848680767C777880807F85847F7E7A9B7874D37471AF
        120FE10303E10301FFEEEBA10904DC0400C20B072E0000C0C0C0C0C0C02E0000
        C30D07F60000FF0403E10303AE0E0ED1726F9D7E7DB27271D01213E30505AA10
        0BFFF6F18F76747F848380817F8583827C7D817E7B7D90817FB1817FD87571A1
        0603DF0100E60905FFEFEAAC130CDB0500C00A04390000C0C0C0C0C0C02D0000
        BA0700FF0B06F40000E50608A9080AD77777A08281B27873C20504E20501A60A
        05FFF6F29981837A7F827F7D7D847F807F7D838982878E7C7DA87876DB7A77A4
        0B08E40906DA0000FFEFEAA60A04DE0803C209053B0000C0C0C0C0C0C0370000
        BB0A03F20200FF0507E20207AC0A0FD774769A7A7BBA7A79C60809E40604A308
        05FFF5F497797E8080868380827F7C7E7E798289858B8781829C7976D379789C
        0907DD0706DB0200FFEDEBAC0D09E00200C50908380000C0C0C0C0C0C0450000
        BF0A08F10000F00000E30308B20509E37478A17F80AA7C7B9C0D0AB6100B8611
        0CFFF8F59B8084817D828281838180827E7A807C787E7D7B7B987F7DC97C7993
        120FBE0501CE0A08FFE7E8B6070AEB0609C103043A0000C0C0C0C0C0C0400000
        C20306FA0404F40403E90B0BC40002FF787E9D7A7E888382A87A6FB77D71AA80
        749A7E777F72708A86857A7D7B7F818187868A868287858383947E79AB6C687A
        181296160BA70E07FFEAEECB020BEA0003CB0A0D3D0000C0C0C0C0C0C0410000
        C50309FF0608EF0000E20301D10B0C910205B1777C917C7E9E8178A08073A080
        75A6847E9E7876A27E7E9D827E937A7899797E98767C9E797BAE7E7DCF8682CC
        716AE07266FC6E67C60710D90005FA060ECA0B0E390000C0C0C0C0C0C0380000
        C3070DF90002F60000E50604BC0C069912107C151C610B136E17156C130F6F18
        166C12126E0C12700F13711717680F1270131C74121E761119710A0F7A0D0F85
        130D92160CAA0B07DD0510F2000BF70005C20709320000C0C0C0C0C0C0380000
        C1070DF30005EB0406D80A08FFE3DCFFF0EBFFEBF2FFEFF7FFEDEDFFF1EFFFED
        EEFFEEF4FFEEF7FFEFF5FFF1F1FFEFEFFFEEF7FFEBF6FFEDF7FFEEF5FFF0F0FF
        F2EEFFEDE5FFECE8CC0006E9010DF70107BD0303350000C0C0C0C0C0C0330000
        C5090EE20003BE0404FF6E6BBF100DB00D0A960F118208089B191496110A920D
        0F93121786050E860B0F87120B8C120C940C10950910950D1391121483120F8D
        1008B81009C00E09FFECEDB70206E80403C70A07370000C0C0C0C0C0C0350000
        C20409E6060CAF0B0CFF726FB10E0BFFEAE7FFF0F0FFF5F2FFEFEAFFF5F0FFF0
        EEFFF2F4FFF2F9FFF3F7FFF5F0FFF6F0FFF1F2FFF2F5FFF3F5FFF3F4FFF6F1FF
        F5F0FFEBE6B50C08FFEFEEA60808E20404C205043D0000C0C0C0C0C0C0390000
        C50609E40308AD080BF7726F96100CFFF4F0FFF9F8FFFBFCFFFCF9FFFCF9FFFD
        F9FFFDF9FFFAFEFFFAFEFFFAFCFFFBFBFFFCFBFFFCFBFFFCFBFFFBFCFFFBFCFF
        F9F8FFF4F0960E0AFFF0F0AE0B0DE20106C6070A3A0000C0C0C0C0C0C0370000
        C40709E30308AD080BF371718C110DFFF6F1FFFAFBFEFDFFFEFEFEFAFFFDF9FF
        FBFAFFFBFFFDFEFFFCFFFFFBFFFFFDFFFAFFFDF9FFFBFCFEFEFEFEFEFEFDFFFF
        FAFBFFF6F28A0F0BFFF0F0AF0A0DE10107C5070C370000C0C0C0C0C0C0300000
        C00709E10406AC090AF5717191100DFFF6F19B7C7D7E80817E808080817F8281
        7D82817D847F80847F81857E83847F8182807F80817D8080807E80807E7F839B
        7C7DFFF5F28F0E0BFFF0F0AE0B0DDF0206C1080A300000C0C0C0C0C0C0300000
        C00808E10406AA0A0AF3726F91110CFFF6F1FFFCFBFBFFFFFFFFFFFFFFFEFFFF
        FCFFFFFCFFFFFFFFFEFFFFFDFFFFFEFFFFFFFEFFFFFCFFFEFFFFFFFFFDFEFFFF
        FCFCFFF5F28F0E0BFFF0F0AC0B0DDF0206C1080A300000C0C0C0C0C0C0370000
        C40708E10406A80A0AF0736F8F110CFFF6F1FFFCFBFFFEFFFFFEFFFFFEFEFFFF
        FCFFFFFEFDFFFFFAFFFFFBFEFFFDFFFFFFFFFEFFFFFCFFFEFFFFFEFFFFFEFFFF
        FBFCFFF5F28D0F0BFFF1F0AA0C0CDF0204C50809370000C0C0C0C0C0C0390000
        C50708E30406A60A0AEE736F8A120CFFF7F1997D7D807F81857F8085807F8280
        7F80817F7C80817C7F837C7F837C808180817F82817D857F80857F80807F8399
        7D7DFFF6F288100BFFF2F0A80C0CE10204C60809390000C0C0C0C0C0C0370000
        C50708E30406A60A0AEC746F85130CFFF8F1FFFBFBFAFEFFFCFEFEFCFFFDF9FF
        FDF9FFFDFEFDFFFFFCFFFFFCFFFEFDFFF9FFFDF9FFFBFCFEFEFCFEFEFAFDFFFF
        FBFBFFF7F283110BFFF2F0A80C0DE10204C60809370000C0C0C0C0C0C0390000
        C40709E10406A8090BEC737183130DFFF7F2FFFCFCFFFEFFFFFEFFFBFFFEF6FF
        FEF6FFFEFDFFFFFFFDFFFFFDFFFDFFFFF6FFFEF6FFFCFBFFFFFFFFFFFFFEFFFF
        FCFCFFF7F281110BFFF1F1A80C0DDF0206C5080A390000C0C0C0C0C0C0420000
        C3050AD80003AA0B0FED6E6F87120DFFF6F2A27A7C8A7C80867D80817F7E7881
        7E76817E7A7F807B7E827B7E827A7F8076817E78827C817F7F867E7F8A7C82A1
        7A7CFFF6F2820D08FFF0F1AA0B0FDE0208C90B103E0000C0C0C0C0C0C0360000
        B10C0FCD0A0C9E090DF1747687100EFFF4F3FFF8FEFFFAFFFFFCFFFFFEFFFDFF
        FEFAFFFEFAFFFFF8FFFFFAFFFFFAFFFFFAFFFEFDFFFEFFFEFFFFFCFFFFFAFFFF
        F8FEFFF4F38C1513FFEAEC9E090CC70406A90407340000C0C0C0C0C0C0190000
        83100D9A0501921114E46F72840E0DFFF5F4FFF8FEFFFBFFFFFCFFFFFEFFFFFF
        FEFFFFFEFDFFFFFAFFFFFBFFFFFDFFFFFFFFFEFFFFFEFFFEFFFFFCFFFFFBFFFF
        F8FEFFF5F4891411FFF0F19515169D08048916131F0302C0C0C0C0C0C0160002
        530000760000880A0FEE7579870F10FFF3F4A4787F8B7A83847D82837E7F867E
        7E847F7E817E807D7E827F7E80817F7F847F7E867E7E837E7F847D828B7A83A4
        787FFFF1F2820A0AFFEEF28E1113700000540000130000C0C0C0C0C0C0250002
        5300007000009A1018FB71798B0A0FFFF2F6FFF8FFFFFBFFFBFEFFFAFFFFFFFF
        FEFFFFFEFFFDFFFFFDFFFFFDFFFFFEFFFFFFFEFFFFFEFAFFFFFBFEFFFFFBFFFF
        F8FFFFF3F5901113FFEDF5950B127000005300002D030AC0C0C0C0C0C0200001
        5D161370140F7D1117D86C72771717FFF7F7FFF8FFFFFCFFF7FEFFF7FFFEFEFF
        FDFFFEFDFFFDFFFFFCFFFFFDFFFFFDFEFFFEFDFEFFFDF7FFFEF7FEFFFFFCFFFF
        F8FFFFF2F270110EFFF0F3780D10721710631C18200001C0C0C0C0C0C0C0C0C0
        1703001E04002000002000001D07000E01000300040000070000050001020301
        0003010000010100010200010200010103020003020000010100000400000503
        00021105001E08001E00002000001E0400150100C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
    end
    object btn4: TBitBtn
      Left = 577
      Top = 134
      Width = 39
      Height = 37
      TabOrder = 3
      OnClick = SpeedButton3Click
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08A23F08A2
        3F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08BC5804BC5804A23F08A2
        3F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A74407C96501CC6701BC5804A2
        3F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08B24E05CC6701CC6701BC
        5804A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08B45105CC6701CC
        6701B45105A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08BC5804CC
        6701CC6701AF4C06A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08
        A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08C4
        6002CC6701C96501A74407A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08
        A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A5
        4208C76202CC6701C25D03A23F08A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        C5681AC16214BD5D0FBA5709B75305B75305B75305B75305B75305B75305B753
        05B75305B75305B75305AF4C06A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A2
        3F08AA4707C96501CC6701B75305A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        EE9B37E7902BDF841FD87914D06E08CC6701CC6701CC6701CC6701CC6701CC67
        01CC6701CC6701CC6701CC6701A54208A23F08C0C0C0C0C0C0C0C0C0C0C0C0A2
        3F08A23F08AF4C06CC6701C96501A74407A23F08A23F08C0C0C0A23F08A23F08
        F7A944F09D39E8922DE18621D97B15D26F0ACD6802CC6701CC6701CC6701CC67
        01CC6701CC6701CC6701C25D03A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0A23F08A23F08BA5604CC6701BC5804A23F08A23F08C0C0C0A23F08A23F08
        FCB04CF8AA46F19F3BE9942FE28823D77917A94609A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0A23F08A23F08A74407CC6701CC6701A74407A23F08A23F08A23F08A23F08
        FCB04CFCB04CE9983CD37A27EB9531E38A25CB6C16A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08BF5B03CC6701BA5604A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA7450CE38F33EC9733E48C27B95A11A23F08A23F08C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08B45105CC6701C25D03A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08B25313EF9E3CED9935E28928AE4D0DA23F08A23F
        08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701C96501A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C36820F6A742EE9B37E38B29AE4D0EA23F
        08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701CC6701A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08CF7729F7A844F09D39E48D2BAF4E
        0EA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701CC6701A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08A23F08DA8532F8AA46F19F3BE58F
        2DAF4E0EA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08B75305CC6701C76202A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08A23F08A23F08DA8632F9AC48F2A1
        3DE6912FB75813A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08C76202CC6701BF5B03A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0A23F08A23F08A23F08DA8633FAAD
        49F3A33EEC9733C06317A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A2
        3F08A23F08A23F08B45105CC6701CC6701B24E05A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0A23F08A23F08A23F08C469
        22FBAE4AF5A540ED9935CD721EA6440AA23F08A23F08A23F08A23F08A23F08A2
        3F08A23F08AA4707CC6701CC6701C76202A23F08A23F08C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A23F
        08B95B19F6A846F6A742EE9B36DB8225B65611A23F08A23F08A23F08A23F08A2
        3F08B45105CC6701CC6701C96501AA4707A23F08A23F08C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F
        08A23F08A8460CDA8532F7A844F09D38E8912DDD8220CC6D13C6640AC25E03C4
        6002CC6701CC6701C76202AA4707A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0A23F08A23F08A23F08B85B19DC8731F19F3AE9932FE28823DA7C17D2710BCD
        6802C76202B75305A54208A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08
        D57F2EF6A948C46922A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0A23F08A23F08A23F08A23F08A7450BBF621AC5681BC16315B7560DAB
        4808A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08
        A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08A23F08A23F08A23F08A2
        3F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
    end
  end
  object GroupBox1: TGroupBox [2]
    Left = 1
    Top = 117
    Width = 618
    Height = 176
    Caption = 'DADOS NF'
    PopupMenu = PopupMenu1
    TabOrder = 3
    object Label7: TLabel
      Left = 7
      Top = 14
      Width = 24
      Height = 13
      Caption = 'S'#233'rie'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 89
      Top = 15
      Width = 53
      Height = 13
      Caption = 'Nota Fiscal'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 210
      Top = 15
      Width = 77
      Height = 13
      Caption = 'Data da Compra'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 417
      Top = 15
      Width = 56
      Height = 13
      Caption = 'N'#186' Parcelas'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 495
      Top = 15
      Width = 54
      Height = 13
      Caption = 'Entrada R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label13: TLabel
      Left = 6
      Top = 55
      Width = 68
      Height = 13
      Caption = 'Caixa / Banco'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 6
      Top = 95
      Width = 68
      Height = 13
      Caption = 'Valor Frete R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 129
      Top = 95
      Width = 78
      Height = 13
      Caption = 'Valor Seguro R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label20: TLabel
      Left = 250
      Top = 95
      Width = 70
      Height = 13
      Caption = 'Valor ICMS R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label21: TLabel
      Left = 372
      Top = 95
      Width = 57
      Height = 13
      Caption = 'Valor IPI R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label22: TLabel
      Left = 494
      Top = 95
      Width = 86
      Height = 13
      Caption = 'Outros Valores R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label24: TLabel
      Left = 199
      Top = 54
      Width = 89
      Height = 13
      Caption = 'Forma Pagamento:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label25: TLabel
      Left = 407
      Top = 55
      Width = 37
      Height = 13
      Caption = 'N. Doc.'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label39: TLabel
      Left = 257
      Top = 135
      Width = 54
      Height = 13
      Caption = 'Chave NFe'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label40: TLabel
      Left = 6
      Top = 135
      Width = 87
      Height = 13
      Caption = 'Valor ICMS ST R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object lbl4: TLabel
      Left = 104
      Top = 135
      Width = 55
      Height = 13
      Caption = 'Funrural R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object lbl5: TLabel
      Left = 176
      Top = 135
      Width = 72
      Height = 13
      Caption = 'Fundecitros R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object CheckBox2: TCheckBox
      Left = 315
      Top = 12
      Width = 95
      Height = 17
      Alignment = taLeftJustify
      BiDiMode = bdLeftToRight
      Caption = 'Vencimento'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentBiDiMode = False
      ParentFont = False
      TabOrder = 18
      OnClick = CheckBox2Click
    end
    object dbeSerie: TDBEdit
      Left = 5
      Top = 29
      Width = 44
      Height = 24
      Hint = '55-NF Eletronia   /  1A - Nota Fiscal Normal'
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'SERIE'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnKeyPress = FormKeyPress
    end
    object DBEdit2: TDBEdit
      Left = 88
      Top = 29
      Width = 118
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'NOTAFISCAL'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnKeyPress = FormKeyPress
    end
    object DBEdit3: TDBEdit
      Left = 208
      Top = 29
      Width = 102
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'DATACOMPRA'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnKeyPress = FormKeyPress
    end
    object DBEdit5: TDBEdit
      Left = 419
      Top = 29
      Width = 72
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'N_PARCELA'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnKeyPress = FormKeyPress
    end
    object DBEdit6: TDBEdit
      Left = 493
      Top = 29
      Width = 115
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'ENTRADA'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnKeyPress = FormKeyPress
    end
    object cbConta: TComboBox
      Left = 4
      Top = 70
      Width = 189
      Height = 24
      BevelKind = bkFlat
      ItemHeight = 16
      TabOrder = 7
      OnKeyPress = FormKeyPress
    end
    object DBEdit1: TDBEdit
      Left = 4
      Top = 109
      Width = 115
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'VALOR_FRETE'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 10
      OnKeyPress = FormKeyPress
    end
    object DBEdit13: TDBEdit
      Left = 127
      Top = 109
      Width = 115
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'VALOR_SEGURO'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 11
      OnKeyPress = FormKeyPress
    end
    object DBEdit15: TDBEdit
      Left = 249
      Top = 109
      Width = 115
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'VALOR_ICMS'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 12
      OnKeyPress = FormKeyPress
    end
    object DBEdit16: TDBEdit
      Left = 371
      Top = 109
      Width = 115
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'VALOR_IPI'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 13
      OnKeyPress = FormKeyPress
    end
    object DBEdit17: TDBEdit
      Left = 493
      Top = 109
      Width = 115
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'OUTRAS_DESP'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 14
      OnKeyPress = FormKeyPress
    end
    object BtnCheque: TBitBtn
      Left = 538
      Top = 59
      Width = 70
      Height = 34
      Caption = '&Cheques'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 17
      OnClick = BtnChequeClick
    end
    object ComboBox1: TComboBox
      Left = 199
      Top = 69
      Width = 202
      Height = 24
      BevelKind = bkFlat
      ItemHeight = 16
      TabOrder = 8
      OnKeyPress = FormKeyPress
    end
    object DBEdit12: TDBEdit
      Left = 405
      Top = 69
      Width = 131
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'N_DOCUMENTO'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 9
      OnKeyPress = FormKeyPress
    end
    object cbPrazo: TJvComboBox
      Left = 312
      Top = 29
      Width = 105
      Height = 24
      ItemHeight = 16
      TabOrder = 4
      Text = 'PRAZO'
      OnChange = cbPrazoChange
      OnKeyPress = FormKeyPress
      Items.Strings = (
        'PRAZO')
      ItemIndex = 0
    end
    object dbDtaVencimento: TDBEdit
      Left = 311
      Top = 37
      Width = 105
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'DATAVENCIMENTO'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      Visible = False
      OnKeyPress = FormKeyPress
    end
    object btnSerie: TBitBtn
      Left = 50
      Top = 28
      Width = 33
      Height = 25
      Caption = '. . .'
      TabOrder = 19
      TabStop = False
      OnClick = btnSerieClick
    end
    object DBEdit4: TDBEdit
      Left = 256
      Top = 148
      Width = 262
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'CHAVENF'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 16
      OnKeyPress = FormKeyPress
    end
    object Button1: TButton
      Left = 520
      Top = 147
      Width = 87
      Height = 25
      Caption = 'Validar NFe'
      TabOrder = 20
      OnClick = Button1Click
    end
    object DBEdit18: TDBEdit
      Left = 4
      Top = 149
      Width = 94
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'ICMS_ST'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 15
      OnKeyPress = FormKeyPress
    end
    object dbedtVALOR_SEGURO: TDBEdit
      Left = 102
      Top = 149
      Width = 72
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'VALOR_SEGURO'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 21
      OnKeyPress = FormKeyPress
    end
    object dbedtVALOR_SEGURO1: TDBEdit
      Left = 175
      Top = 149
      Width = 72
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'VALOR_SEGURO'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 22
      OnKeyPress = FormKeyPress
    end
    object dbedtFUNRURAL: TDBEdit
      Left = 102
      Top = 149
      Width = 72
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'FUNRURAL'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 23
      OnKeyPress = FormKeyPress
    end
    object dbedtVALOR_SEGURO3: TDBEdit
      Left = 175
      Top = 149
      Width = 72
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'FUNDECITROS'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 24
      OnKeyPress = FormKeyPress
    end
  end
  inherited MMJPanel1: TMMJPanel
    Top = 0
    Width = 793
    Height = 60
    Align = alTop
    Background.StartColor = clActiveCaption
    Background.EndColor = clSilver
    inherited btnCancelar: TBitBtn [0]
      Left = 83
      Top = 2
      Width = 77
      Height = 55
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08A23F08A2
        3F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08BC5804BC5804A23F08A2
        3F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A74407C96501CC6701BC5804A2
        3F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08B24E05CC6701CC6701BC
        5804A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08B45105CC6701CC
        6701B45105A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08BC5804CC
        6701CC6701AF4C06A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08
        A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08C4
        6002CC6701C96501A74407A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08
        A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A5
        4208C76202CC6701C25D03A23F08A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        C5681AC16214BD5D0FBA5709B75305B75305B75305B75305B75305B75305B753
        05B75305B75305B75305AF4C06A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A2
        3F08AA4707C96501CC6701B75305A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        EE9B37E7902BDF841FD87914D06E08CC6701CC6701CC6701CC6701CC6701CC67
        01CC6701CC6701CC6701CC6701A54208A23F08C0C0C0C0C0C0C0C0C0C0C0C0A2
        3F08A23F08AF4C06CC6701C96501A74407A23F08A23F08C0C0C0A23F08A23F08
        F7A944F09D39E8922DE18621D97B15D26F0ACD6802CC6701CC6701CC6701CC67
        01CC6701CC6701CC6701C25D03A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0A23F08A23F08BA5604CC6701BC5804A23F08A23F08C0C0C0A23F08A23F08
        FCB04CF8AA46F19F3BE9942FE28823D77917A94609A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0A23F08A23F08A74407CC6701CC6701A74407A23F08A23F08A23F08A23F08
        FCB04CFCB04CE9983CD37A27EB9531E38A25CB6C16A23F08A23F08A23F08A23F
        08A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08BF5B03CC6701BA5604A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA7450CE38F33EC9733E48C27B95A11A23F08A23F08C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08B45105CC6701C25D03A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08B25313EF9E3CED9935E28928AE4D0DA23F08A23F
        08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701C96501A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C36820F6A742EE9B37E38B29AE4D0EA23F
        08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701CC6701A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08CF7729F7A844F09D39E48D2BAF4E
        0EA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08AD4906CC6701CC6701A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08A23F08DA8532F8AA46F19F3BE58F
        2DAF4E0EA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08B75305CC6701C76202A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08A23F08A23F08A23F08DA8632F9AC48F2A1
        3DE6912FB75813A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0A23F08A23F08C76202CC6701BF5B03A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0A23F08A23F08A23F08DA8633FAAD
        49F3A33EEC9733C06317A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A2
        3F08A23F08A23F08B45105CC6701CC6701B24E05A23F08A23F08A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0A23F08A23F08A23F08C469
        22FBAE4AF5A540ED9935CD721EA6440AA23F08A23F08A23F08A23F08A23F08A2
        3F08A23F08AA4707CC6701CC6701C76202A23F08A23F08C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08A23F
        08B95B19F6A846F6A742EE9B36DB8225B65611A23F08A23F08A23F08A23F08A2
        3F08B45105CC6701CC6701C96501AA4707A23F08A23F08C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F
        08A23F08A8460CDA8532F7A844F09D38E8912DDD8220CC6D13C6640AC25E03C4
        6002CC6701CC6701C76202AA4707A23F08A23F08C0C0C0C0C0C0A23F08A23F08
        FCB04CFCB04CE6943BA23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0A23F08A23F08A23F08B85B19DC8731F19F3AE9932FE28823DA7C17D2710BCD
        6802C76202B75305A54208A23F08A23F08C0C0C0C0C0C0C0C0C0A23F08A23F08
        D57F2EF6A948C46922A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0A23F08A23F08A23F08A23F08A7450BBF621AC5681BC16315B7560DAB
        4808A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08
        A23F08A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08A23F08A23F08A23F08A2
        3F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        A23F08A23F08A23F08C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A23F08A23F08A23F08A23F08C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    inherited btnExcluir: TBitBtn [1]
      Left = 83
      Top = 2
      Width = 77
      Height = 55
      Layout = blGlyphTop
    end
    inherited btnGravar: TBitBtn [2]
      Left = 4
      Top = 2
      Width = 77
      Height = 55
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C00066000066000066000066000066000066005B8D5AB5B3B3B5B3B3B5B3
        B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B3B5B3B32D792D00660000
        6600006600006600006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008300008C00008C00008C00008C00007000367C36FAF6F3FDF9F6FDF9
        F6FDF9F6FDF9F6FDF9F6F9F6F3F0EEECE7E5E4DEDDDDDEDDDD327E3200660000
        6600006600007500008A00008300006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300297528FAF6F30066000066
        00006600006600FAF6F3FDF9F6F9F6F3F0EEECE7E5E4DEDDDD37833600660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000073002A7629F6F0ED0066000066
        00006600006600F3F0EDFBF7F4FDF9F7F8F4F2EFECEAE6E4E338843800660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000073002B772AEFE8E40066000066
        00006600006600E9E6E4F5F2EFFCF8F5FDF9F6F6F3F0EDEBE93A863900660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000073002D782BE8DEDB0066000066
        00006600006600DBD8D7ECE9E6F7F3F0FCF9F6FCF9F6F5F1EF3C883B00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300307A2DE0D4D10066000066
        00006600006600C9C7C5DEDCDAEEEBE8F8F4F1FDF9F6FBF8F53E893C00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300327C2FDACCC90066000066
        00006600006600B2B1B0CDCBCAE2DFDDF0EDEAF9F5F3FDF9F63F8B3E00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300357E30D6C6C30066000066
        00006600006600A2A1A1B7B6B5D1CFCDE5E2E0F2EFECFAF7F43F8B3E00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009900009900009900009900007300377F32D6C6C3C9BDBABDB4
        B2B2ADACA9A6A6A3A2A1A3A3A3BCBBBAD5D3D1E8E4E2F4F0EE3E8A3D00660000
        6600006600007A00009700008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000099000099000099000099000099
        0000990000990000990000990000990000990000990000990000990000990000
        9900009900009900009800008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000099000099000099000099000099000099000099000099000099
        0000990000990000990000990000990000990000990000990000990000990000
        9900009900009900009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00009300008C00018E01049408079B0F0AA0140CA4180DA61A0DA6
        1A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0DA61A0D
        A61A0DA61A0AA213009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C00008000006600036B051187211EA13C29B65130C56133CB6733CB
        6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733CB6733
        CB6733CB6726BF4D009900008C00006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        006600008C000080003F893DFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BF4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        0066000083000079003B863AFAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3
        F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FAF3F2FA
        F3F2FAF3F226BB4D009900006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0006600006600317D31C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2
        C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3C2C2C3
        C2C2D6BCBB26B24D006600006600C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    inherited btnIncluir: TBitBtn [3]
      Left = 4
      Top = -79
      Width = 77
      Height = 55
      Layout = blGlyphTop
    end
    inherited btnProcurar: TBitBtn
      Left = 410
      Top = 2
      Width = 77
      Height = 55
      Visible = False
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C08D958B
        828478909488C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C07892A3576A77
        979EA19699978B958FC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C05595D66C9BD1
        5162839396A48C92918B928BC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C06BAFFC84C0FF
        6E97CE4E6A8D94A4B18890908F9493C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0A9D2FF7EB4F0
        6CBAFF4B93D340618896A2B4868D9095958FC0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        6DC0FE66BDFF6197CE405F8690A0B18E9392959283C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        9CCDED7FC4F570BAFA5D9AD844628B8C98AA919B95727B677175628585777A74
        6D827D7A737877737B7A727A79777A71817D64897E5E927D61937C62917B628D
        7862927E65927D629A8266927D5D91835F888062807D6FA8A8A2C0C0C0C0C0C0
        C0C0C0C0C0C07DC2FB73B5F66F97D24E658B8C9DA05B6656434532767162847B
        71716B664D4F4F4C54545A626157584E574F325A472162451E67492063482362
        4823624B255D441C6A4D216046185F491F554625524E3C97958DC0C0C0C0C0C0
        C0C0C0C0C0C06A8DAF8FBBF083B4FA7299D063768381847B877F788F857B9895
        8697978B959294ABABB18F92967877738B7C6C887052866A3B826630826A3484
        6F3B7F6D387E6A33866E34876F3B81694595836C2D23198A8582C0C0C0C0C0C0
        C0C0C0C0C0C08993A4A7BDE182AAE595BDEE8995A19A948D9E8D84D9CBBFE2E0
        CEFAFDEEF8F3F4F7F3F9E7EBECDFDDDCA0948A937E69E6CFA9FFFFDCFFFFD4FF
        FFD3FFFFD9FFFFD5FFFFD8FFFFD8FFFADFF2E2D2463B338B8580C0C0C0C0C0C0
        C0C0C0C0C0C0918E90E8E6F2CEE1FCC8DAF1ACAAAAA39484EBD4BEFEECD5FDFA
        E5FFFFF4FBF8F3FFFEFDF4FBF4F8FDF4F1EDE8B3AAA1857A6CCFC3B1FAF3E0F6
        F0DDF6F5E0E9E8D3F2F1DCF2EEDBFFFFF5E5DFD4433D32928C81C0C0C0C0C0C0
        C0C0C0C0C0C0AD9D91FFF0E9F2F5FDF8FCFFA69689CCB399FCE1BFF7E3C0F3ED
        D0FAFBE7FAFBF1DADED9DEE2DCEEF2ECE4E5E1FEFBF7A09B9A7772718B888481
        827E808780828984FAFFFCFBFFFCF8F8F2E1DED6443C35887F76C0C0C0C0C0C0
        C0C0C0C0C0C0B79E84FFECD7FEF9FAE2DEDDDFC5A7FFE9BDFFEFC2FFE9BCFFFB
        D3FFFFE1FBFFF5EFF6F3F6F7FBFCFBFFFFFFFCF4F1ECE1DCDD716C6EBCBCBCF8
        FDFCF7FFFEF1FCFAEEF8F8F5FBFAFFFFFBE2DED945373B918188C0C0C0C0C0C0
        C0C0C0C0C0C0BB997BFFF2D6FFFDF7BFB5AEFEE0C3F2CBA4DABA91CEB589FFF3
        C3FFFFDFF5FAEBF5FDFDC4C7CFC6C9CEC2C2BCFAF7F2FEF9FB86808B6C6A7E00
        0015000016000010F3FDFFF2FAFAF5F9F3DEDED83F383D8E828EC0C0C0C0C0C0
        C0C0C0C0C0C0C9A58DFFE8CFF3DDD2DAC8C1D2B7A9E6C5B5DDBCA9EDD1B3FFF7
        C1FFFFD8F6F6EACAD0D5C5D4D7C2D0CEC2CAC0FEFCF4FEF7FCA49AB16A629712
        0E4F0D0F50202556E5EDFFF3FCFFF9FFF9DEE6DC363A3B7B7F84C0C0C0C0C0C0
        C0C0C0C0C0C0BD9882FFEED7F4D7CED2BFB8FFFAF2D4BEB2F4D2C5DFC1A6FFF4
        BCFEF9C2FFFFEEF8F9EFC9D8CAE4F7E4D1DAC0FFFFECFDF5F5B0A7C26E67A434
        3181E4E6FF060C4FEEF6FFF5FEFFF6FFF5D3DACD363A35878A88C0C0C0C0C0C0
        C0C0C0C0C0C0BF9D86FFE8D2FDE0DCD3C2BFFFFCEAEAE0C8E0C1AAE0C09DFFEC
        B5FFF7BCFFF4C4FFFFDCFFFFDAD7E3B3D8E3ABEDF2C5FFFEF39F99AC7678A832
        387B293282081258E7F1FFF1FBFFF6FFF2E1E2CE433A2D99887FC0C0C0C0C0C0
        C0C0C0C0C0C0BE9B87FFF7E5FFECEBCABCBDF1F4E4FEFEE6F1DAC4FFE4C7F3DC
        AFFEECB7FFFBC6FFEEBBFFF8C3F5F4BCF9FFBDF5F9C5E5E1CF837E87C7C9E7E7
        EDFFE3ECFFE6EFFFEBF5FFF0FAFFFAFFF2DFDDC54B3A259C836FC0C0C0C0C0C0
        C0C0C0C0C0C0C39A8BFFF1E2FFF5F1E6DCDCB1B8B1D7DDD2F1E3DDF6E0D4F8E4
        CBF5E2C1F6DFBFE8D0ACE6CCA4E3CFA0F4EFB8F7F5C5D0C9B59A939087828B7E
        7E907C7C9A6F7390EFF5FFEFF5FAFCFFF6E7E6CC412F10AC926EC0C0C0C0C0C0
        C0C0C0C0C0C0C19B89FFE5D6FFF8F5FEFCFF99A2ABE5ECF5FFFAFCFFFEFAFFF8
        EAE6D8C1F6E7C6F5E1B8FFE6BDFFE4B8FFF3C8EBE2C0918D7BC7C1BAFFFBF7FF
        FEFCFFF8FCFFF9FFFAFCFFF5FCFFF9FDF1E8E3CA463310AB926AC0C0C0C0C0C0
        C0C0C0C0C0C0BA9B84FFF0D8FFFCFDEEF5FFD9E2FF747C9A9DA3A8C7C8BFFFF9
        F0FFFFEDE7EAB2EFEDA7DFCC8FF4D8A9B49C80B2A597AFB0AEF8F6F5FFFBF424
        01002200001F0903EEF1F5F6FFFFFFFFF3EEE2CA49371A9D8868C0C0C0C0C0C0
        C0C0C0C0C0C0BD9E85FFF4DAFCFDFBE3F0FF0D15510B1454808AB2949BAEEBEE
        F2FCFEEBEEF7C5EAEFAAEFE79ACDBF7D90805BCBC4B5EDF8F6FFFEFF33080547
        08004E1000370B00FFFFFEECF4F3FFFCEFEADDC746381C9D8F72C0C0C0C0C0C0
        C0C0C0C0C0C0C89E87FFECD6FDFBF3EBF7FFDBE2FF2A2E9EC1CAFF0C1965818D
        A589938DA2A69AB4B88EB0B95ED3DE787A823CFDFFDFF0FFF7FAF4F9FFECFBA7
        444EFFA79F4D0500FFF4F3FDFFFFFFFAF1EAE0CE3B351892906EC0C0C0C0C0C0
        C0C0C0C0C0C0CE9D83FFEFD4FFFDEFF8F8FFEDE5FF3C328F342D8E141159F4F3
        FFFFFCF7FFFAF6FFFFE58385337D8423777933FFFFD9FAFFECFFFEFBFFEDF7A7
        474DA9483A5C0E00FFF8F3FFF7F2FFFAEBECDEC8403B228B8A6EC0C0C0C0C0C0
        C0C0C0C0C0C0D2A07CFFF0CDFFFDE9FFF8F1FFE6EAFFE3EFFFE2F3FFE3EFFFE9
        E0FFECD9FFECD9FFF0D2FFF7C5FFFAC4FFF4CEFFEED2FFEDD6FFEEDAFFEBD9FF
        E8D2FFEECEFFEFD1FFF5E2FFFAE5FFFFE4FFE2C3564635968E81C0C0C0C0C0C0
        C0C0C0C0C0C0C38B5AE7A46BD39870D6A17CDB9F75DB9F75DB9D77DB9D77E09F
        73E29F72E29E73DE9F73D5A172D39F70D99E71DE9E75DFA178DBA177D19970C8
        9166C38857E7A777CB825CCB865FD8A071AC845A4B331D948277C0C0C0C0C0C0
        C0C0C0C0C0C0A468229D4E00873A008C3E008E3C008E3C008E3C008E3D00903F
        00913F00933B00913B008A3F008740008C4200914200923E00913A0091360093
        3801973D009D42009C42028C390094531695632E5B3816B69A82C0C0C0C0C0C0
        C0C0C0C0C0C0AE772EB46B0FCB7F2DCC7E31CE7C2ECE7D2CCC7E2BCA8028C883
        22C88322CA7F29C87E2CC7812DC88227CD851FD08420CF7C27CF782ED97C3DE3
        8647EE9249CF792DFFAE63D38B43C88D48B88A54664623F9E0C6C0C0C0C0C0C0
        C0C0C0C0C0C0C6A167BC8940C18B4CAE773AB27D3AB27E37B48034B18230A886
        2DA1862FA18433A28334AA8436AD7F31B57E2DBA8132B67F3CB57C3EB77A3ABA
        7D3BB47934B9833CB0853CA781399C7939AE9361E0CFB5C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    inherited btnSair: TBitBtn
      Left = 330
      Top = 2
      Width = 77
      Height = 55
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C000000000000000000000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C08AB4CE005696005D9F005F99005C94005B93005A90005A91005A9000
        598E195B811F5D8230627C4D6D7E5C7582C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B4CDDE186A9D146B9F176FA2176F
        A21970A30C679A02639C1B76C91976C61674C11575BE1272BA106FB60B6BAE0B
        6AAE0364A90064A500619E005A9F005C9C20597BDDD7D4C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C072A5C7004A8206437007406D0640
        6D073F6D014D800766A5217FD22083D22487D32183D22183D22183D22081D01F
        7ECF1D7DCC1B78C91A78C71871C00668AD125A85D6D0CBC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0EEE7EF5F9BBD00508513375F14355D1436
        5F14325A044F660866AC268AD7288CD5278ED6278DD6268DD6268BD5268AD426
        8AD42286D22287D32387D3207FD01072BC125985D3CDC7C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0D4D5D4408440629ABE005288123964133561112A
        5F013E220D785A0B65B7288ED92D93D9268BD5298FD72B91D82B91D8258CD626
        8CD5268DD6268CD5268BD52188D41475C6125886C9C3BEC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0A8B7A71E8F2305880A4A84B60044800B2E4C06393C0465
        1550BC533C95A10762B02F93DC2D94D9278CD52B92D92D94DA2D94DA258DD627
        8DD62A91D8288ED7268DD5288ED7187EC6115883C0BCB8C0C0C0C0C0C0C0C0C0
        C0C0C064956303940E27C23A32C0442EB63C35B84251C55E69D27A76D88D85DF
        9D79DA8C0062641371BB3396DF349ADD238BD33198DC3298DC3399DD298FD72B
        91D82F96DA2C93D9288FD72C92D91F82C900588DB0AFAEC0C0C0C0C0C0EAEFE9
        35863700A1061EBB2F25BB362FBC403AC54E58CC6C60D07664D07975D68C7BDC
        90177F180044611579C93599DF399EDF268DD9389EE2359CDF379DDF2B90D82B
        91D83198DC3096DB2990D72F94DB2587D500588EA8A8A7C0C0C0C0C0C0C7DCC6
        0085010EB72016B92826BB3730BC4039C34C4EC96260CF7570D78579DE8E24A2
        1E063934034F8B1A7BBF389FE53CA4E51F78B02C83B7369BDC3DA5E82D93DA2D
        94D9379ADD3299DD2A91D83397DD278BD4005B91A0A3A2C0C0C0C0C0C0C0C0C0
        DAE8D92B9A2F12AD2128BF3A2FBC403BC54E51CD6357CD6541B34A0B6E1A072F
        481334620153861B80CA3996D21B5E9A0A4D920D4883164C6E3594D12E97DE2F
        95DB389FE1349BDE2A91D7399EE02A8DD9005C93979C9EC0C0C0C0C0C0C0C0C0
        C0C0C0EAECE94D9F4E04A31134C5472BB137188D2516633B09483C0B37501435
        6413385F005288278BCE1A6FB6105EAA1A7DCB1472C30A417D2D72932F97DE31
        98DC3BA1E3389EE12A91D8389EE22E93DA02619D8A9399C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C071B57315A0211B911C096095083D731332601337621337
        5F13375F02578F288CD20F5EA81879C82086D31D81D00F5EAC175E8E3196D934
        9ADE3EA4E53BA1E22991D83BA2E33398E10665A4869093C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0AFD1AE1B931A06639F0C406B13365E1338601337
        5F12385F005D942C91D7145EA657A3D860ACDF5DAADC155FA72172A0359ADE34
        9BDE40A6E53EA4E42991D83FA5E5369CE40666A5768992C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E1F5DC005B9210386013375F1338601337
        5F12375E005D943199DB2175B19CB0D3EEF5FDC2D2E7195D9E3C9DD3339BE037
        9DE041A7E541A7E72990D840A6E53A9FE50668A671858CC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000578F11386013375F1338601337
        5E0D3D670360963297D93FA8E92A84BD559ACA2F85BF41A2DD4CB4F1359CDE38
        A0E245ABEA48AEEA2A90D743A9E73EA6E80F72B4607F8DC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000568E13355E1338611338601336
        5E0E3C6604639E3399DA4DB1F03FA9E92994DC4DB5F24CB3F04CB2EE359CE038
        9FE148AEEA49AEEB2B91D946AAEA3FA7E71374B7597A8BC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0004F861233520F2E501338601336
        5D0B426C0565A13B9FE14DB3EF3EA6E739A1E44DB7F248B0EF4AB3F1319BE034
        9FE445AFEF46B1F0258FD93DA8EA47AFEE1375B748718BC0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0004984025A16003B170D254B1436
        5C0B426E0A6BA93EA2E54AB5F438A1E43AA4E853B5EE4EB4EE53B6EF419EDD53
        A8DD60B7E863B9E84B9CD462B4E64AAEEF1478BE466F87C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00035740E771623A3260033180A18
        3A09406B0B6EABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF127DC63A6B86C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C08BA08D0062072E9B3280E39940B2480042
        0D0A32530B74BA0000FF0000FF0000FFFFFFFF0000FFFFFFFFFFFFFF0000FFFF
        FFFF0000FFFFFFFF0000FFFFFFFFFFFFFF1A81CB306380C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0819E802B862C219E2C4AC55A62CD736ED4847DDB9356C6
        5C0868470B6DBBFFFFFFFFFFFF0000FFFFFFFF0000FFFFFFFFFFFFFF0000FFFF
        FFFF0000FFFFFFFF0000FFFFFFFFFFFFFF1981CB2C6382C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C057965705A4122CC03E44C85856CB6B60D0766CD18076D68C90E8
        9F3793930B6CB50000FF0000FF0000FFFFFFFF0000FF0000FF0000FF0000FFFF
        FFFF0000FFFFFFFF0000FFFFFFFFFFFFFF1B87D2245F81C0C0C0C0C0C0C0C0C0
        C0C0C000920321BD322ABF3C31C3443DC54F54CD6565D2786BD28083DE9B77DC
        7E127572147BC60000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFF0000FFFF
        FFFF0000FFFFFFFF0000FF0000FF0000FF2694DC1B587CC0C0C0C0C0C0C0C0C0
        4FA0520BB51D1EBE3012AD2118992144A84F095B3024912D79DD9056BF620B66
        10004D6D1C83CB0000FF0000FF0000FFFFFFFFFFFFFF0000FF0000FFFFFFFFFF
        FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFF2C98DE195B7EC0C0C0C0C0C0C0C0C0
        0B90100CB61D00900678A178C2D4BEC0C0C008367019842B4BC34D0157110F2C
        53024F851B87CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFF349BE015597FC0C0C0C0C0C0C3DEC3
        0190062A8F2DD2D1CFC0C0C0C0C0C0C0C0C00F39660464180149201330651532
        5B025182228BCF5EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55E
        B9F55EB9F55EB9F55EB9F55EB9F55EB9F5339BE00C547EC0C0C0C0C0C0C3E1C3
        007000B4BBB5C0C0C0C0C0C0C0C0C0C0C0C000487C00467400437900477A0045
        76005588268CCE49B5FB5EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55EB9F55E
        B9F53EAAF033A1E92C9AE23093D42B8FCF0F76BD105780C0C0C0C0C0C0C5E2C5
        4F9250C0C0C0C0C0C0C0C0C0C0C0C0C0C0C04389B2488BB6478CB5478CB54F91
        B80461962485C644AAEE3BA8EF39A2E92E9BE02892D9238ACF1780C90A74BE04
        6CAD005C96005991005A97025893096195186B9D75A0B8C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C02E77A600589500609E00548F00518800548B0F6192256C972C78A13F7DA14B
        89AA7AA6C3A5C6DABDCAD2C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
      Layout = blGlyphTop
    end
    object btnImprimir: TBitBtn
      Left = 162
      Top = 2
      Width = 87
      Height = 55
      Caption = '&Imprimir'
      PopupMenu = PopupMenu1
      TabOrder = 6
      OnClick = btnImprimirClick
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888888888888888888888888888888888888888888888888800000000000
        0000000000000000008880777777777777777777777777777088070000000000
        000000000000000000080F7777777777777777777777777777080F7777777777
        777777777777777777080F77F7F7F7F7F7F7F7F7F7F7F77777080F77FFFFFFFF
        FFFFFFFFFFFFF77777080F7777777777777777777777F77777080F7700000000
        000000000000F72277080F777777777777777777777777AA77080F7777777777
        777777777777777777080F7F7F7F7F7F7F7F7F7F7F7F7F7F7F080FFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF080F77777777777777777777777777770880F700000000
        0000000000000777708880F87088888888888888880077777088880F808F8F8F
        8F8F8F8F8F0777770888880880FFFFFFFFFFFFFFFF0777770888888000FFFFFF
        FFFFFFFFFF0000008888888880FFFFFFFFFFFFFFFF0888888888888880FFFFFF
        FFFFFFFFFF0888888888888880FFFFFFFFFFFF88880888888888888880FFFFFF
        FFFFF700070888888888888880FFFFFFFFFFF7FFF08888888888888880FFFFFF
        FFFFF7FF088888888888888880FFFFFFFFFFF7F0888888888888888880FFFFFF
        FFFFF70888888888888888888000000000000088888888888888888888888888
        8888888888888888888888888888888888888888888888888888}
      Layout = blGlyphTop
      Margin = 0
    end
    object btnNotaFiscal: TBitBtn
      Left = 251
      Top = 2
      Width = 77
      Height = 55
      Caption = 'Nota Fiscal'
      PopupMenu = PopupMenu1
      TabOrder = 7
      OnClick = btnNotaFiscalClick
      Glyph.Data = {
        36080000424D3608000000000000360400002800000020000000200000000100
        0800000000000004000000000000000000000001000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
        A600D4F0FF00B1E2FF008ED4FF006BC6FF0048B8FF0025AAFF0000AAFF000092
        DC00007AB90000629600004A730000325000D4E3FF00B1C7FF008EABFF006B8F
        FF004873FF002557FF000055FF000049DC00003DB90000319600002573000019
        5000D4D4FF00B1B1FF008E8EFF006B6BFF004848FF002525FF000000FE000000
        DC000000B900000096000000730000005000E3D4FF00C7B1FF00AB8EFF008F6B
        FF007348FF005725FF005500FF004900DC003D00B90031009600250073001900
        5000F0D4FF00E2B1FF00D48EFF00C66BFF00B848FF00AA25FF00AA00FF009200
        DC007A00B900620096004A00730032005000FFD4FF00FFB1FF00FF8EFF00FF6B
        FF00FF48FF00FF25FF00FE00FE00DC00DC00B900B90096009600730073005000
        5000FFD4F000FFB1E200FF8ED400FF6BC600FF48B800FF25AA00FF00AA00DC00
        9200B9007A009600620073004A0050003200FFD4E300FFB1C700FF8EAB00FF6B
        8F00FF487300FF255700FF005500DC004900B9003D0096003100730025005000
        1900FFD4D400FFB1B100FF8E8E00FF6B6B00FF484800FF252500FE000000DC00
        0000B9000000960000007300000050000000FFE3D400FFC7B100FFAB8E00FF8F
        6B00FF734800FF572500FF550000DC490000B93D000096310000732500005019
        0000FFF0D400FFE2B100FFD48E00FFC66B00FFB84800FFAA2500FFAA0000DC92
        0000B97A000096620000734A000050320000FFFFD400FFFFB100FFFF8E00FFFF
        6B00FFFF4800FFFF2500FEFE0000DCDC0000B9B9000096960000737300005050
        0000F0FFD400E2FFB100D4FF8E00C6FF6B00B8FF4800AAFF2500AAFF000092DC
        00007AB90000629600004A73000032500000E3FFD400C7FFB100ABFF8E008FFF
        6B0073FF480057FF250055FF000049DC00003DB9000031960000257300001950
        0000D4FFD400B1FFB1008EFF8E006BFF6B0048FF480025FF250000FE000000DC
        000000B90000009600000073000000500000D4FFE300B1FFC7008EFFAB006BFF
        8F0048FF730025FF570000FF550000DC490000B93D0000963100007325000050
        1900D4FFF000B1FFE2008EFFD4006BFFC60048FFB80025FFAA0000FFAA0000DC
        920000B97A000096620000734A0000503200D4FFFF00B1FFFF008EFFFF006BFF
        FF0048FFFF0025FFFF0000FEFE0000DCDC0000B9B90000969600007373000050
        5000F2F2F200E6E6E600DADADA00CECECE00C2C2C200B6B6B600AAAAAA009E9E
        9E0092929200868686007A7A7A006E6E6E0062626200565656004A4A4A003E3E
        3E0032323200262626001A1A1A000E0E0E00F0FBFF00A4A0A000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707
        0707070707070707070707070707070707070707070707070707070707070707
        0707070707070707070707070707070707070707070707070707070707070707
        0700000000000000000000000000000000000007070707070707070707070707
        0700070707070707070707070707070707070007070707070707070707070707
        070007EE07EE07EE07EE07EE07EE07EE07EE0007070707070707070707070707
        0700EEBEEEBEEEBEEEA6EEBEEEBEEEBEEE070007070707070707070707070707
        0700BE07BE07BE07BE07BE07BE07BE0707EE0007070707070707070707070707
        0700EEBE07BE07BE07BE07BE07BE07BEEE070007070707070707070707070707
        0700BE07BE07BE07BE07BE000000000000EE0007070707070707070707070707
        0700EEBE07BE07BE070000000000000000000007070707070707070707070707
        0700BE07BE07BE07000000BEBEBEBEBEBE000000000707070707070707070707
        0700EEBE07BE07C800BEBEBEBEBEBEBEBEBEBE00000007070707070707070707
        0700BE07BE070000BEBEBEBEBEBEBEBEBEBEBE00000000070707070707070707
        070007BEEE0000BEBEBEBEBEBEBEBEBEBEBEBE00000000070707070707070707
        0700BE07BE00BE00BEBEBE00BE00BEBEBEBEBE00000700000707070707070707
        070007EE0000BE00BEBE0000BE00BEBEBEBEBE00000700000707070707070707
        0700BE000000BE00BE00BE00BE00BEBEBEBEBE00000707000007070707070707
        0700070000BEBE00BE00BE00BE000000BEBEBE00000707000007070707070707
        0700BE0000BEBE00BE00BE00BE00BEBEBEBEBE00000707000007070707070707
        0700070000BEBE0000BEBE00BE00BEBEBEBEBE00000707000007070707070707
        0700BE0000BEBE00BEBEBE00BE00000000BEBE00000707000007070707070707
        0700000000BEBEBEBEBEBEBEBEBEBEBEBEBEBE00000707000007070707070707
        070707000000BEBEBEBEBEBEBEBEBEBEBEBEBE00000707000007070707070707
        070707000000BEBEBEBEBEBEBEBEBEBEBEBEBE00000700000707070707070707
        0707070700000000000000000000000000000000000700000707070707070707
        0707070707000000000000000000000000000000000000070707070707070707
        0707070707000007070707070707070707070707070000070707070707070707
        0707070707070000070707070707070707070707000007070707070707070707
        0707070707070700000000070707070707000000000707070707070707070707
        0707070707070707070000000000000000000007070707070707070707070707
        0707070707070707070707000000000000070707070707070707070707070707
        0707070707070707070707070707070707070707070707070707}
      Layout = blGlyphTop
      Margin = 0
    end
  end
  inherited MMJPanel2: TMMJPanel
    Top = 495
    Width = 793
    Height = 23
    Align = alBottom
    Background.StartColor = clSilver
    Background.EndColor = clActiveCaption
    inherited Label1: TLabel
      Top = 31
    end
    inherited Label2: TLabel
      Top = 30
    end
    object Label23: TLabel
      Left = 8
      Top = 5
      Width = 313
      Height = 13
      Caption = 'Entrada de Mercadorias em Estoque - Finaliza Compras'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object GroupBox2: TGroupBox [5]
    Left = 0
    Top = 60
    Width = 622
    Height = 59
    Caption = 'COMPRADOR'
    PopupMenu = PopupMenu1
    TabOrder = 2
    object Label3: TLabel
      Left = 8
      Top = 14
      Width = 44
      Height = 16
      Caption = 'C'#243'digo'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 90
      Top = 13
      Width = 37
      Height = 16
      Caption = 'Nome'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object lbl1: TLabel
      Left = 350
      Top = 13
      Width = 56
      Height = 16
      Caption = 'Caixa(un)'
    end
    object lbl2: TLabel
      Left = 420
      Top = 13
      Width = 61
      Height = 16
      Caption = 'Pre'#231'o(R$)'
    end
    object lbl3: TLabel
      Left = 487
      Top = 13
      Width = 60
      Height = 16
      Caption = 'Valor (R$)'
    end
    object dbeUsuario: TDBEdit
      Left = 8
      Top = 31
      Width = 78
      Height = 24
      Color = clInfoBk
      DataField = 'CODCOMPRADOR'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnExit = dbeUsuarioExit
      OnKeyPress = FormKeyPress
    end
    object DBEdit14: TDBEdit
      Left = 88
      Top = 31
      Width = 484
      Height = 24
      TabStop = False
      Color = clInfoBk
      DataField = 'NOMEUSUARIO'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnKeyPress = FormKeyPress
    end
    object btnUsuarioProcura: TBitBtn
      Left = 573
      Top = 18
      Width = 39
      Height = 36
      Enabled = False
      PopupMenu = PopupMenu1
      TabOrder = 2
      TabStop = False
      OnClick = btnUsuarioProcuraClick
      Glyph.Data = {
        36080000424D3608000000000000360400002800000020000000200000000100
        0800000000000004000000000000000000000001000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00090909001212
        12001F1F1F002C2C2C003939390045454500525252005F5F5F006C6C6C007878
        780085858500929292009F9F9F00ABABAB00B8B8B800C5C5C500D2D2D200DEDE
        DE00EBEBEB00F8F8F800F0FBFF00A4A0A000C0DCC000F0CAA60000003E000000
        5D0000007C0000009B000000BA000000D9000000F0002424FF004848FF006C6C
        FF009090FF00B4B4FF0000143E00001E5D0000287C0000329B00003CBA000046
        D9000055F000246DFF004885FF006C9DFF0090B5FF00B4CDFF00002A3E00003F
        5D0000547C0000699B00007EBA000093D90000AAF00024B6FF0048C2FF006CCE
        FF0090DAFF00B4E6FF00003E3E00005D5D00007C7C00009B9B0000BABA0000D9
        D90000F0F00024FFFF0048FFFF006CFFFF0090FFFF00B4FFFF00003E2A00005D
        3F00007C5400009B690000BA7E0000D9930000F0AA0024FFB60048FFC2006CFF
        CE0090FFDA00B4FFE600003E1400005D1E00007C2800009B320000BA3C0000D9
        460000F0550024FF6D0048FF85006CFF9D0090FFB500B4FFCD00003E0000005D
        0000007C0000009B000000BA000000D9000000F0000024FF240048FF48006CFF
        6C0090FF9000B4FFB400143E00001E5D0000287C0000329B00003CBA000046D9
        000055F000006DFF240085FF48009DFF6C00B5FF9000CDFFB4002A3E00003F5D
        0000547C0000699B00007EBA000093D90000AAF00000B6FF2400C2FF4800CEFF
        6C00DAFF9000E6FFB4003E3E00005D5D00007C7C00009B9B0000BABA0000D9D9
        0000F0F00000FFFF2400FFFF4800FFFF6C00FFFF9000FFFFB4003E2A00005D3F
        00007C5400009B690000BA7E0000D9930000F0AA0000FFB62400FFC24800FFCE
        6C00FFDA9000FFE6B4003E1400005D1E00007C2800009B320000BA3C0000D946
        0000F0550000FF6D2400FF854800FF9D6C00FFB59000FFCDB4003E0000005D00
        00007C0000009B000000BA000000D9000000F0000000FF242400FF484800FF6C
        6C00FF909000FFB4B4003E0014005D001E007C0028009B003200BA003C00D900
        4600F0005500FF246D00FF488500FF6C9D00FF90B500FFB4CD003E002A005D00
        3F007C0054009B006900BA007E00D9009300F000AA00FF24B600FF48C200FF6C
        CE00FF90DA00FFB4E6003E003E005D005D007C007C009B009B00BA00BA00D900
        D900F000F000FF24FF00FF48FF00FF6CFF00FF90FF00FFB4FF002A003E003F00
        5D0054007C0069009B007E00BA009300D900AA00F000B624FF00C248FF00CE6C
        FF00DA90FF00E6B4FF0014003E001E005D0028007C0032009B003C00BA004600
        D9005500F0006D24FF008548FF009D6CFF00B590FF00CDB4FF00222222222222
        2222222222222222222222222222222222222222222222222222222222222222
        222222222222222222222222222222222222222222222222222222220E0E0E0E
        0E0E0E000000060E0E0E0000030D0D0000000D0D00000D0D00000E060E0E0E0E
        0E06000E0E000E060E000E000B0500030300050D0D0005050000060E060E0E0E
        06000E0E0E00060E000E0E00000B030B030808000500000022220E060E060E06
        000E0E0E0E000000000E0E00000B0B03030808000000222222220000060E0600
        060E0E0E0048484800000E0007030B03070F0800222222222222222200000006
        0E0E0E004848484848000008030B03070F0F080022222222222222222222000E
        060E004848484848480000070B03070F0F070800222222222222222222220006
        00004848484848480000000703034B0808000000000000222222222222220000
        00484848480000000000000008034B4B4B4B4B4B4B4B08002222222222222200
        0048484848484848484848480008074B4B4B4B4B4B4B4B002222222222000000
        0000004848484848484848484800074B4B4B4B4B4B4B07002222222222000000
        0000004848484848484848484800074B4B4B4B4B080000002222222200000000
        0000004848484848484848000008074B4B4B4B4B4B4B07002222222200000000
        0000004848484848484848484800074B4B4B4B4B4B0000000022220000000000
        000048484848484848484848480007074B4B4B4B4B4B4B4B0022000000000000
        004848484848484848484848000000074B4B4B4B4B4B4B002222000000000000
        0048484848484848484848484848004B4B4B0C0C4B4B00222222000000000000
        0000004848484848480048484800084B4B4B0800000800222222000000000000
        0000004848484848000048480008074B4B4B4B07070700222222000000000000
        000000000048484848000000080B03074B4B4B4B4B4B08002222000000000000
        00000000004848484848000008070300074B004B004B03080022000000000000
        000000000048484848484800080B000B03030B030B03070B0022220000000000
        00000000004848484848000008070B070B0B0B0B030B0B0B0022220000000000
        000000000000000000000000080B070B0B0B0B0B0B0B0B002222222200000000
        00000000000000000000000008070B070B0B0B0B0B0B00222222222200000000
        000000000000000000000000000B070B0B0B0B0B000022222222222222000000
        0000000000000000000000000000000000000000222222222222222222220000
        0000000000000000000000222222222222222222222222222222222222222222
        0000000000000000000022222222222222222222222222222222222222222222
        2222222222222222222222222222222222222222222222222222}
    end
    object dbedtCODCOMPRADOR: TDBEdit
      Left = 8
      Top = 30
      Width = 78
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      Color = clInfoBk
      DataField = 'CODVENDEDOR'
      DataSource = fCompra.DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      Visible = False
      OnExit = dbeUsuarioExit
      OnKeyPress = FormKeyPress
    end
    object dbedtNOMEUSUARIO: TDBEdit
      Left = 88
      Top = 30
      Width = 256
      Height = 24
      TabStop = False
      BevelKind = bkFlat
      BorderStyle = bsNone
      Color = clInfoBk
      DataField = 'COMPRADOR'
      DataSource = fCompra.DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      Visible = False
      OnKeyPress = FormKeyPress
    end
    object JvCxComprador: TJvCalcEdit
      Left = 348
      Top = 30
      Width = 67
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DisplayFormat = ',##0'
      ShowButton = False
      TabOrder = 5
      Visible = False
      DecimalPlacesAlwaysShown = False
      OnChange = dtDataPagFreteChange
      OnKeyPress = FormKeyPress
    end
    object jvPrecoComprador: TJvCalcEdit
      Left = 419
      Top = 30
      Width = 66
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DisplayFormat = ',##0.00'
      ShowButton = False
      TabOrder = 6
      Visible = False
      DecimalPlacesAlwaysShown = False
      OnChange = dtDataPagFreteChange
      OnKeyPress = edPrecoColhedorKeyPress
    end
    object jvTotalComprador: TJvCalcEdit
      Left = 488
      Top = 30
      Width = 83
      Height = 24
      BevelKind = bkFlat
      BorderStyle = bsNone
      DisplayFormat = ',##0.00'
      TabOrder = 7
      Visible = False
      DecimalPlacesAlwaysShown = False
      OnChange = dtDataPagFreteChange
      OnKeyPress = FormKeyPress
    end
  end
  object GroupBox4: TGroupBox [6]
    Left = 622
    Top = 60
    Width = 171
    Height = 435
    Align = alRight
    Caption = 'R$'
    PopupMenu = PopupMenu1
    TabOrder = 5
    object Label14: TLabel
      Left = 25
      Top = 40
      Width = 66
      Height = 16
      Caption = 'Valor Total'
    end
    object Label15: TLabel
      Left = 25
      Top = 161
      Width = 78
      Height = 16
      Caption = 'Desconto R$'
    end
    object Label16: TLabel
      Left = 25
      Top = 224
      Width = 68
      Height = 16
      Caption = #193' pagar R$'
    end
    object Label17: TLabel
      Left = 25
      Top = 284
      Width = 80
      Height = 16
      Caption = 'Valor Pgo R$'
    end
    object Label18: TLabel
      Left = 25
      Top = 100
      Width = 75
      Height = 16
      Caption = 'Multa / Juros'
    end
    object Label19: TLabel
      Left = 25
      Top = 344
      Width = 78
      Height = 16
      Caption = 'Diferen'#231'a R$'
    end
    object DBEdit7: TDBEdit
      Left = 25
      Top = 58
      Width = 121
      Height = 32
      BorderStyle = bsNone
      Color = clInfoBk
      DataField = 'VALOR'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnKeyPress = FormKeyPress
    end
    object DBEdit8: TDBEdit
      Left = 25
      Top = 119
      Width = 121
      Height = 32
      BorderStyle = bsNone
      DataField = 'MULTA_JUROS'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnExit = DBEdit8Exit
      OnKeyPress = FormKeyPress
    end
    object DBEdit9: TDBEdit
      Left = 25
      Top = 180
      Width = 121
      Height = 32
      BorderStyle = bsNone
      DataField = 'DESCONTO'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnExit = DBEdit9Exit
      OnKeyPress = FormKeyPress
    end
    object DBEdit10: TDBEdit
      Left = 25
      Top = 244
      Width = 121
      Height = 32
      BorderStyle = bsNone
      DataField = 'VALOR_PAGAR'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnKeyPress = FormKeyPress
    end
    object DBEdit11: TDBEdit
      Left = 25
      Top = 303
      Width = 121
      Height = 32
      BorderStyle = bsNone
      DataField = 'ENTRADA'
      DataSource = DtSrc
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnExit = DBEdit11Exit
      OnKeyPress = FormKeyPress
    end
    object Edit1: TEdit
      Left = 25
      Top = 362
      Width = 121
      Height = 28
      TabStop = False
      BorderStyle = bsNone
      Color = clInfoBk
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
    end
  end
  inherited DtSrc: TDataSource
    DataSet = cds_compra
    Left = 232
    Top = 457
  end
  object DataSource1: TDataSource
    DataSet = DM.cds_7_contas
    Left = 504
    Top = 461
  end
  object SQLDataSet1: TSQLDataSet
    CommandText = 
      'select pag.*, forn.NOMEFORNECEDOR, ( VALOR_RESTO - VALORRECEBIDO' +
      ') as VALORPAG  from PAGAMENTO pag '#13#10'inner join FORNECEDOR forn o' +
      'n forn.CODFORNECEDOR=pag.CODFORNECEDOR '#13#10'where CODCOMPRA=:pcod'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'pcod'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 328
    Top = 461
    object SQLDataSet1CODPAGAMENTO: TIntegerField
      FieldName = 'CODPAGAMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object SQLDataSet1TITULO: TStringField
      FieldName = 'TITULO'
      Required = True
      Size = 18
    end
    object SQLDataSet1EMISSAO: TDateField
      FieldName = 'EMISSAO'
    end
    object SQLDataSet1CODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
      Required = True
    end
    object SQLDataSet1DATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
    end
    object SQLDataSet1DATAPAGAMENTO: TDateField
      FieldName = 'DATAPAGAMENTO'
    end
    object SQLDataSet1CAIXA: TSmallintField
      FieldName = 'CAIXA'
    end
    object SQLDataSet1CONTADEBITO: TIntegerField
      FieldName = 'CONTADEBITO'
    end
    object SQLDataSet1CONTACREDITO: TIntegerField
      FieldName = 'CONTACREDITO'
    end
    object SQLDataSet1STATUS: TStringField
      FieldName = 'STATUS'
      Required = True
      FixedChar = True
      Size = 2
    end
    object SQLDataSet1VIA: TStringField
      FieldName = 'VIA'
      Required = True
      FixedChar = True
      Size = 1
    end
    object SQLDataSet1FORMAPAGAMENTO: TStringField
      FieldName = 'FORMAPAGAMENTO'
      Required = True
      FixedChar = True
      Size = 1
    end
    object SQLDataSet1DATABAIXA: TDateField
      FieldName = 'DATABAIXA'
    end
    object SQLDataSet1HISTORICO: TStringField
      FieldName = 'HISTORICO'
      Size = 150
    end
    object SQLDataSet1CODCOMPRA: TIntegerField
      FieldName = 'CODCOMPRA'
    end
    object SQLDataSet1CODALMOXARIFADO: TSmallintField
      FieldName = 'CODALMOXARIFADO'
    end
    object SQLDataSet1CODCOMPRADOR: TSmallintField
      FieldName = 'CODCOMPRADOR'
    end
    object SQLDataSet1CODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
    end
    object SQLDataSet1N_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
    end
    object SQLDataSet1DATASISTEMA: TSQLTimeStampField
      FieldName = 'DATASISTEMA'
    end
    object SQLDataSet1VALORRECEBIDO: TFloatField
      FieldName = 'VALORRECEBIDO'
    end
    object SQLDataSet1JUROS: TFloatField
      FieldName = 'JUROS'
    end
    object SQLDataSet1DESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object SQLDataSet1PERDA: TFloatField
      FieldName = 'PERDA'
    end
    object SQLDataSet1TROCA: TFloatField
      FieldName = 'TROCA'
    end
    object SQLDataSet1FUNRURAL: TFloatField
      FieldName = 'FUNRURAL'
    end
    object SQLDataSet1VALOR_PRIM_VIA: TFloatField
      FieldName = 'VALOR_PRIM_VIA'
    end
    object SQLDataSet1VALOR_RESTO: TFloatField
      FieldName = 'VALOR_RESTO'
    end
    object SQLDataSet1VALORTITULO: TFloatField
      FieldName = 'VALORTITULO'
    end
    object SQLDataSet1OUTRO_CREDITO: TFloatField
      FieldName = 'OUTRO_CREDITO'
    end
    object SQLDataSet1OUTRO_DEBITO: TFloatField
      FieldName = 'OUTRO_DEBITO'
    end
    object SQLDataSet1NOMEFORNECEDOR: TStringField
      FieldName = 'NOMEFORNECEDOR'
      Required = True
      Size = 50
    end
    object SQLDataSet1VALORPAG: TFloatField
      FieldName = 'VALORPAG'
      ProviderFlags = []
    end
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = SQLDataSet1
    UpdateMode = upWhereKeyOnly
    Left = 359
    Top = 462
  end
  object scdsCr_proc: TClientDataSet
    Aggregates = <>
    AggregatesActive = True
    Params = <
      item
        DataType = ftInteger
        Name = 'pcod'
        ParamType = ptInput
      end>
    ProviderName = 'DataSetProvider1'
    Left = 392
    Top = 461
    object scdsCr_procCODPAGAMENTO: TIntegerField
      FieldName = 'CODPAGAMENTO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object scdsCr_procTITULO: TStringField
      FieldName = 'TITULO'
      ProviderFlags = [pfInUpdate]
      Required = True
      Size = 18
    end
    object scdsCr_procEMISSAO: TDateField
      FieldName = 'EMISSAO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object scdsCr_procDATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procDATAPAGAMENTO: TDateField
      FieldName = 'DATAPAGAMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procCAIXA: TSmallintField
      FieldName = 'CAIXA'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procCONTADEBITO: TIntegerField
      FieldName = 'CONTADEBITO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procCONTACREDITO: TIntegerField
      FieldName = 'CONTACREDITO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procSTATUS: TStringField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
      Required = True
      OnGetText = scdsCr_procSTATUSGetText
      FixedChar = True
      Size = 2
    end
    object scdsCr_procVIA: TStringField
      FieldName = 'VIA'
      ProviderFlags = [pfInUpdate]
      Required = True
      FixedChar = True
      Size = 1
    end
    object scdsCr_procFORMAPAGAMENTO: TStringField
      FieldName = 'FORMAPAGAMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
      FixedChar = True
      Size = 1
    end
    object scdsCr_procDATABAIXA: TDateField
      FieldName = 'DATABAIXA'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procHISTORICO: TStringField
      FieldName = 'HISTORICO'
      ProviderFlags = [pfInUpdate]
      Size = 150
    end
    object scdsCr_procCODCOMPRA: TIntegerField
      FieldName = 'CODCOMPRA'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procCODALMOXARIFADO: TSmallintField
      FieldName = 'CODALMOXARIFADO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procCODCOMPRADOR: TSmallintField
      FieldName = 'CODCOMPRADOR'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procCODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procDATASISTEMA: TSQLTimeStampField
      FieldName = 'DATASISTEMA'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procVALORRECEBIDO: TFloatField
      FieldName = 'VALORRECEBIDO'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procJUROS: TFloatField
      FieldName = 'JUROS'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procDESCONTO: TFloatField
      DisplayLabel = 'JUROS'
      FieldName = 'DESCONTO'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procPERDA: TFloatField
      DisplayLabel = 'JUROS'
      FieldName = 'PERDA'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procTROCA: TFloatField
      DisplayLabel = 'JUROS'
      FieldName = 'TROCA'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procFUNRURAL: TFloatField
      DisplayLabel = 'JUROS'
      FieldName = 'FUNRURAL'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procVALOR_PRIM_VIA: TFloatField
      FieldName = 'VALOR_PRIM_VIA'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procVALOR_RESTO: TFloatField
      FieldName = 'VALOR_RESTO'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procVALORTITULO: TFloatField
      FieldName = 'VALORTITULO'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procOUTRO_CREDITO: TFloatField
      FieldName = 'OUTRO_CREDITO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procOUTRO_DEBITO: TFloatField
      FieldName = 'OUTRO_DEBITO'
      ProviderFlags = [pfInUpdate]
    end
    object scdsCr_procNOMEFORNECEDOR: TStringField
      FieldName = 'NOMEFORNECEDOR'
      ProviderFlags = []
      Required = True
      Size = 50
    end
    object scdsCr_procVALORPAG: TFloatField
      FieldName = 'VALORPAG'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object scdsCr_procTRecebido: TAggregateField
      Alignment = taRightJustify
      FieldName = 'TRecebido'
      Active = True
      DisplayFormat = ',#0.00'
      Expression = 'SUM(VALORRECEBIDO)'
    end
    object scdsCr_procTotal_resto: TAggregateField
      Alignment = taRightJustify
      FieldName = 'Total_resto'
      Active = True
      DisplayFormat = ',#0.00'
      Expression = 'sum(VALOR_PRIM_VIA-VALORRECEBIDO)'
    end
    object scdsCr_procTotalTitulo: TAggregateField
      FieldName = 'TotalTitulo'
      Active = True
      DisplayFormat = ',#0.00'
      Expression = 'sum(VALOR_PRIM_VIA)'
    end
  end
  object ds_Cr: TDataSource
    DataSet = scdsCr_proc
    Left = 424
    Top = 460
  end
  object sqs_tit: TSQLDataSet
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.sqlsisAdimin
    Left = 456
    Top = 461
  end
  object sds_compra: TSQLDataSet
    CommandText = 
      'select com.*'#13#10'         , forn.NOMEFORNECEDOR'#13#10'         , usu.NOM' +
      'EUSUARIO'#13#10'         , banc.BANCO '#13#10'from COMPRA com '#13#10'inner join F' +
      'ORNECEDOR forn on forn.CODFORNECEDOR=com.CODFORNECEDOR '#13#10'inner j' +
      'oin USUARIO usu on usu.CODUSUARIO=com.CODCOMPRADOR '#13#10'left outer ' +
      'join BANCO banc on banc.CODBANCO=com.BANCO '#13#10'where CODCOMPRA = :' +
      'CODCOMPRA or CODMOVIMENTO = :PCODMOV'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'CODCOMPRA'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'PCODMOV'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 141
    Top = 457
    object sds_compraCODCOMPRA: TIntegerField
      FieldName = 'CODCOMPRA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object sds_compraCODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_compraCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_compraDATACOMPRA: TDateField
      FieldName = 'DATACOMPRA'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_compraDATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object sds_compraNUMEROBORDERO: TIntegerField
      FieldName = 'NUMEROBORDERO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraBANCO: TSmallintField
      FieldName = 'BANCO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraCODCOMPRADOR: TSmallintField
      FieldName = 'CODCOMPRADOR'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraSTATUS: TSmallintField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraCODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraDATASISTEMA: TDateField
      FieldName = 'DATASISTEMA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraVALOR: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraNOTAFISCAL: TIntegerField
      FieldName = 'NOTAFISCAL'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraSERIE: TStringField
      FieldName = 'SERIE'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraDESCONTO: TFloatField
      FieldName = 'DESCONTO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraCODCCUSTO: TSmallintField
      FieldName = 'CODCCUSTO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraN_PARCELA: TSmallintField
      FieldName = 'N_PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraOPERACAO: TStringField
      FieldName = 'OPERACAO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sds_compraFORMAPAGAMENTO: TStringField
      FieldName = 'FORMAPAGAMENTO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sds_compraN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraCAIXA: TSmallintField
      FieldName = 'CAIXA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraMULTA_JUROS: TFloatField
      FieldName = 'MULTA_JUROS'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraAPAGAR: TFloatField
      FieldName = 'APAGAR'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraVALOR_PAGAR: TFloatField
      FieldName = 'VALOR_PAGAR'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraENTRADA: TFloatField
      FieldName = 'ENTRADA'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraN_BOLETO: TStringField
      FieldName = 'N_BOLETO'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object sds_compraSTATUS1: TStringField
      FieldName = 'STATUS1'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sds_compraNOMEFORNECEDOR: TStringField
      FieldName = 'NOMEFORNECEDOR'
      ProviderFlags = []
      Required = True
      Size = 50
    end
    object sds_compraNOMEUSUARIO: TStringField
      FieldName = 'NOMEUSUARIO'
      ProviderFlags = []
      Required = True
      Size = 30
    end
    object sds_compraBANCO_1: TStringField
      FieldName = 'BANCO_1'
      ProviderFlags = []
      Size = 18
    end
    object sds_compraVALOR_ICMS: TFloatField
      FieldName = 'VALOR_ICMS'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraVALOR_FRETE: TFloatField
      FieldName = 'VALOR_FRETE'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraVALOR_SEGURO: TFloatField
      FieldName = 'VALOR_SEGURO'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraOUTRAS_DESP: TFloatField
      FieldName = 'OUTRAS_DESP'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraVALOR_IPI: TFloatField
      FieldName = 'VALOR_IPI'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraCFOP: TStringField
      FieldName = 'CFOP'
      ProviderFlags = [pfInUpdate]
      Size = 4
    end
    object sds_compraPRAZO: TStringField
      FieldName = 'PRAZO'
      ProviderFlags = [pfInUpdate]
      Size = 40
    end
    object sds_compraCHAVENF: TStringField
      FieldName = 'CHAVENF'
      Size = 60
    end
    object sds_compraICMS_ST: TFloatField
      FieldName = 'ICMS_ST'
    end
    object sds_compraICMS_BASE_ST: TFloatField
      FieldName = 'ICMS_BASE_ST'
    end
    object sds_compraINDPAG: TIntegerField
      FieldName = 'INDPAG'
    end
    object sds_compraDIGITOVALIDACAO: TStringField
      FieldName = 'DIGITOVALIDACAO'
      Size = 100
    end
    object sds_compraFUNRURAL: TFloatField
      FieldName = 'FUNRURAL'
      ProviderFlags = [pfInUpdate]
    end
    object sds_compraFUNDECITROS: TFloatField
      FieldName = 'FUNDECITROS'
      ProviderFlags = [pfInUpdate]
    end
  end
  object dsp_compra: TDataSetProvider
    DataSet = sds_compra
    UpdateMode = upWhereKeyOnly
    Left = 171
    Top = 457
  end
  object cds_compra: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'CODCOMPRA'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'PCODMOV'
        ParamType = ptInput
      end>
    ProviderName = 'dsp_compra'
    BeforePost = cds_compraBeforePost
    OnCalcFields = cds_compraCalcFields
    OnNewRecord = cds_compraNewRecord
    OnReconcileError = cds_compraReconcileError
    Left = 201
    Top = 457
    object cds_compraCODCOMPRA: TIntegerField
      FieldName = 'CODCOMPRA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cds_compraCODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cds_compraCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cds_compraDATACOMPRA: TDateField
      FieldName = 'DATACOMPRA'
      ProviderFlags = [pfInUpdate]
      Required = True
      EditMask = '!99/99/00;1;_'
    end
    object cds_compraDATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
      EditMask = '!99/99/00;1;_'
    end
    object cds_compraNUMEROBORDERO: TIntegerField
      FieldName = 'NUMEROBORDERO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraBANCO: TSmallintField
      FieldName = 'BANCO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraCODCOMPRADOR: TSmallintField
      FieldName = 'CODCOMPRADOR'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraSTATUS: TSmallintField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraCODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraDATASISTEMA: TDateField
      FieldName = 'DATASISTEMA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraVALOR: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraNOTAFISCAL: TIntegerField
      FieldName = 'NOTAFISCAL'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraSERIE: TStringField
      FieldName = 'SERIE'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraDESCONTO: TFloatField
      FieldName = 'DESCONTO'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraCODCCUSTO: TSmallintField
      FieldName = 'CODCCUSTO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraN_PARCELA: TSmallintField
      FieldName = 'N_PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraOPERACAO: TStringField
      FieldName = 'OPERACAO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cds_compraFORMAPAGAMENTO: TStringField
      FieldName = 'FORMAPAGAMENTO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cds_compraN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraCAIXA: TSmallintField
      FieldName = 'CAIXA'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraMULTA_JUROS: TFloatField
      FieldName = 'MULTA_JUROS'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraAPAGAR: TFloatField
      FieldName = 'APAGAR'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraVALOR_PAGAR: TFloatField
      FieldName = 'VALOR_PAGAR'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraENTRADA: TFloatField
      FieldName = 'ENTRADA'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraN_BOLETO: TStringField
      FieldName = 'N_BOLETO'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object cds_compraSTATUS1: TStringField
      FieldName = 'STATUS1'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cds_compraNOMEFORNECEDOR: TStringField
      FieldName = 'NOMEFORNECEDOR'
      ProviderFlags = []
      Required = True
      Size = 50
    end
    object cds_compraNOMEUSUARIO: TStringField
      FieldName = 'NOMEUSUARIO'
      ProviderFlags = []
      Required = True
      Size = 30
    end
    object cds_compraBANCO_1: TStringField
      FieldName = 'BANCO_1'
      ProviderFlags = []
      Size = 18
    end
    object cds_compraVALOR_ICMS: TFloatField
      FieldName = 'VALOR_ICMS'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraVALOR_FRETE: TFloatField
      FieldName = 'VALOR_FRETE'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraVALOR_SEGURO: TFloatField
      FieldName = 'VALOR_SEGURO'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraOUTRAS_DESP: TFloatField
      FieldName = 'OUTRAS_DESP'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraVALOR_IPI: TFloatField
      FieldName = 'VALOR_IPI'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cds_compraCFOP: TStringField
      FieldName = 'CFOP'
      Size = 4
    end
    object cds_compradiferenca: TFloatField
      FieldKind = fkCalculated
      FieldName = 'diferenca'
      Calculated = True
    end
    object cds_compraPRAZO: TStringField
      FieldName = 'PRAZO'
      Size = 40
    end
    object cds_compraCHAVENF: TStringField
      FieldName = 'CHAVENF'
      Size = 60
    end
    object cds_compraICMS_ST: TFloatField
      FieldName = 'ICMS_ST'
    end
    object cds_compraICMS_BASE_ST: TFloatField
      FieldName = 'ICMS_BASE_ST'
    end
    object cds_compraINDPAG: TIntegerField
      FieldName = 'INDPAG'
    end
    object cds_compraDIGITOVALIDACAO: TStringField
      FieldName = 'DIGITOVALIDACAO'
      Size = 100
    end
    object cds_compraFUNRURAL: TFloatField
      FieldName = 'FUNRURAL'
      ProviderFlags = [pfInUpdate]
    end
    object cds_compraFUNDECITROS: TFloatField
      FieldName = 'FUNDECITROS'
      ProviderFlags = [pfInUpdate]
    end
  end
  object VCLReport1: TVCLReport
    AsyncExecution = False
    Title = 'Untitled'
    Left = 472
    Top = 24
  end
  object UCHist_DataSetComprasFinalizar: TUCHist_DataSet
    DataSet = cds_compra
    ControlHistorico = UCControlHistoricoComprasFinalizar
    Left = 728
    Top = 20
  end
  object UCControlHistoricoComprasFinalizar: TUCControlHistorico
    UserControl = fComercial.UserControlComercial
    Options.SaveNewRecord = False
    Options.SaveDelete = True
    Options.SavePostInsert = True
    Options.SavePostEdit = True
    Options.TypeSavePostEdit = tpSaveAllFields
    TableHistory.TableName = 'UCTABHistory'
    TableHistory.FieldApplicationID = 'ApplicationID'
    TableHistory.FieldUserID = 'UserID'
    TableHistory.FieldEventDate = 'EventDate'
    TableHistory.FieldEventTime = 'EventTime'
    TableHistory.FieldForm = 'Form'
    TableHistory.FieldCaptionForm = 'FormCaption'
    TableHistory.FieldEvent = 'Event'
    TableHistory.FieldObs = 'Obs'
    TableHistory.FieldTableName = 'tName'
    HistoryMsg.Evento_Insert = 'Inserido'
    HistoryMsg.Evento_Delete = 'Apagado'
    HistoryMsg.Evento_Edit = 'Editado'
    HistoryMsg.Evento_NewRecord = 'Novo registro'
    HistoryMsg.Hist_All = 'Todos'
    HistoryMsg.Msg_LimpHistorico = 'Excluir todo o conte'#250'do do hist'#243'rico ?'
    HistoryMsg.Msg_MensConfirma = 'Confirma'#231#227'o'
    HistoryMsg.Msg_LogEmptyHistory = 'Usu'#225'rio %s apagou todo o hist'#243'rico as %s'
    HistoryMsg.LabelDescricao = 'Hist'#243'rico de tabelas'
    HistoryMsg.LabelUser = 'Usu'#225'rio'
    HistoryMsg.LabelForm = 'Formul'#225'rio'
    HistoryMsg.LabelEvento = 'Evento'
    HistoryMsg.LabelTabela = 'Tabela'
    HistoryMsg.LabelDataEvento = 'Data'
    HistoryMsg.LabelHoraEvento = 'Hora'
    HistoryMsg.Msg_NewRecord = '%s inseriu um novo registro'
    HistoryMsg.Hist_MsgExceptPropr = 'Favor informar a propriedade %s'
    HistoryMsg.Hist_BtnFiltro = '&Aplicar Filtro'
    HistoryMsg.Hist_BtnExcluir = '&Excluir Hist'#243'rico'
    HistoryMsg.Hist_BtnFechar = '&Fechar'
    Left = 752
    Top = 60
  end
  object s_7: TSQLDataSet
    CommandText = 
      'select CODIGO, CONTA, NOME, RATEIO, CODREDUZIDO from PLANO where' +
      ' plnCtaMain(CONTA) = :PCONTARECEITA and CONSOLIDA = '#39'S'#39
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'PCONTARECEITA'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 21
    Top = 456
    object s_7CODIGO: TIntegerField
      FieldName = 'CODIGO'
      Required = True
    end
    object s_7CONTA: TStringField
      FieldName = 'CONTA'
      Required = True
      Size = 15
    end
    object s_7NOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 200
    end
    object s_7RATEIO: TStringField
      FieldName = 'RATEIO'
      FixedChar = True
      Size = 1
    end
    object s_7CODREDUZIDO: TStringField
      FieldName = 'CODREDUZIDO'
      Size = 15
    end
  end
  object d_7: TDataSetProvider
    DataSet = s_7
    Options = [poAllowCommandText]
    UpdateMode = upWhereKeyOnly
    Left = 51
    Top = 456
  end
  object cds_7_contas: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftString
        Name = 'PCONTARECEITA'
        ParamType = ptInput
      end>
    ProviderName = 'd_7'
    Left = 94
    Top = 456
    object cds_7_contasCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Required = True
    end
    object cds_7_contasCONTA: TStringField
      FieldName = 'CONTA'
      Required = True
      Size = 15
    end
    object cds_7_contasNOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 200
    end
    object cds_7_contasRATEIO: TStringField
      FieldName = 'RATEIO'
      FixedChar = True
      Size = 1
    end
    object cds_7_contasCODREDUZIDO: TStringField
      FieldName = 'CODREDUZIDO'
      Size = 15
    end
  end
  object sqlBuscaNota: TSQLQuery
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.sqlsisAdimin
    Left = 280
    Top = 456
  end
  object OpenDialog1: TOpenDialog
    Left = 528
    Top = 24
  end
  object scds_serie_proc: TSQLClientDataSet
    CommandText = 
      'select CODSERIE, SERIE, ULTIMO_NUMERO, NOTAFISCAL from SERIES wh' +
      'ere SERIE like :pSERIE'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftString
        Name = 'pSERIE'
        ParamType = ptInput
      end>
    DBConnection = DM.sqlsisAdimin
    Left = 688
    Top = 17
    object scds_serie_procCODSERIE: TStringField
      FieldName = 'CODSERIE'
      FixedChar = True
      Size = 3
    end
    object scds_serie_procSERIE: TStringField
      FieldName = 'SERIE'
      Required = True
    end
    object scds_serie_procULTIMO_NUMERO: TIntegerField
      FieldName = 'ULTIMO_NUMERO'
      Required = True
    end
    object scds_serie_procNOTAFISCAL: TSmallintField
      FieldName = 'NOTAFISCAL'
    end
  end
  object cds: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'CODVENDA'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'PCODMOV'
        ParamType = ptInput
      end>
    ProviderName = 'dsp_compra'
    Left = 687
    Top = 56
    object cdsCODMOVIMENTO: TIntegerField
      FieldName = 'CODMOVIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cdsCODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
      ProviderFlags = [pfInUpdate]
      Required = True
    end
    object cdsDATAVENDA: TDateField
      FieldName = 'DATAVENDA'
      ProviderFlags = [pfInUpdate]
      Required = True
      EditMask = '!99/99/00;1;_'
    end
    object cdsDATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
      ProviderFlags = [pfInUpdate]
      Required = True
      EditMask = '!99/99/00;1;_'
    end
    object cdsNUMEROBORDERO: TIntegerField
      FieldName = 'NUMEROBORDERO'
      ProviderFlags = [pfInUpdate]
    end
    object cdsBANCO: TSmallintField
      FieldName = 'BANCO'
      ProviderFlags = [pfInUpdate]
    end
    object cdsCODVENDEDOR: TSmallintField
      FieldName = 'CODVENDEDOR'
      ProviderFlags = [pfInUpdate]
    end
    object cdsCODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
      ProviderFlags = [pfInUpdate]
    end
    object cdsDATASISTEMA: TDateField
      FieldName = 'DATASISTEMA'
      ProviderFlags = [pfInUpdate]
    end
    object cdsVALOR: TFloatField
      FieldName = 'VALOR'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
    end
    object cdsNOTAFISCAL: TIntegerField
      FieldName = 'NOTAFISCAL'
      ProviderFlags = [pfInUpdate]
    end
    object cdsSERIE: TStringField
      FieldName = 'SERIE'
      ProviderFlags = [pfInUpdate]
    end
    object cdsNOMECLIENTE: TStringField
      FieldName = 'NOMECLIENTE'
      ProviderFlags = []
      Required = True
      Size = 50
    end
    object cdsNOMEUSUARIO: TStringField
      FieldName = 'NOMEUSUARIO'
      ProviderFlags = []
      Required = True
      Size = 30
    end
    object cdsBANCO_1: TStringField
      FieldName = 'BANCO_1'
      ProviderFlags = []
      Size = 18
    end
    object cdsCODVENDA: TIntegerField
      FieldName = 'CODVENDA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cdsDESCONTO: TFloatField
      FieldName = 'DESCONTO'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cdsCODCCUSTO: TSmallintField
      FieldName = 'CODCCUSTO'
      ProviderFlags = [pfInUpdate]
    end
    object cdsN_PARCELA: TSmallintField
      FieldName = 'N_PARCELA'
      ProviderFlags = [pfInUpdate]
    end
    object cdsN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object cdsCAIXA: TSmallintField
      FieldName = 'CAIXA'
    end
    object cdsMULTA_JUROS: TFloatField
      FieldName = 'MULTA_JUROS'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
    end
    object cdsAPAGAR: TFloatField
      FieldName = 'APAGAR'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
    end
    object cdsVALOR_PAGAR: TFloatField
      FieldName = 'VALOR_PAGAR'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cdsENTRADA: TFloatField
      FieldName = 'ENTRADA'
      ProviderFlags = [pfInUpdate]
      DisplayFormat = ',##0.00'
    end
    object cdsN_BOLETO: TStringField
      FieldName = 'N_BOLETO'
      ProviderFlags = [pfInUpdate]
      Size = 30
    end
    object cdsFORMARECEBIMENTO: TStringField
      FieldName = 'FORMARECEBIMENTO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cdsOPERACAO: TStringField
      FieldName = 'OPERACAO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cdsSTATUS: TSmallintField
      FieldName = 'STATUS'
      ProviderFlags = [pfInUpdate]
    end
    object cdsSTATUS1: TStringField
      FieldName = 'STATUS1'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cdsCONTROLE: TStringField
      FieldName = 'CONTROLE'
      ProviderFlags = [pfInUpdate]
      Size = 15
    end
    object cdsOBS: TStringField
      FieldName = 'OBS'
      ProviderFlags = [pfInUpdate]
      Size = 100
    end
    object cdsdiferenca: TFloatField
      FieldKind = fkCalculated
      FieldName = 'diferenca'
      DisplayFormat = ',##0.00'
      Calculated = True
    end
    object cdsVALOR_ICMS: TFloatField
      FieldName = 'VALOR_ICMS'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cdsVALOR_FRETE: TFloatField
      FieldName = 'VALOR_FRETE'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cdsVALOR_SEGURO: TFloatField
      FieldName = 'VALOR_SEGURO'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cdsOUTRAS_DESP: TFloatField
      FieldName = 'OUTRAS_DESP'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cdsVALOR_IPI: TFloatField
      FieldName = 'VALOR_IPI'
      DisplayFormat = ',##0.00'
      EditFormat = ',##0.00'
    end
    object cdsCOD_TRANPORTADORA: TIntegerField
      FieldName = 'COD_TRANPORTADORA'
      ProviderFlags = []
    end
    object cdsPRAZO: TStringField
      FieldName = 'PRAZO'
      Size = 40
    end
  end
  object s_Contrato: TSQLDataSet
    CommandText = 
      'select c.VALOR_FRETE'#13#10'        , c.VALOR_COLHEITA'#13#10'        , c.VA' +
      'LOR_COMICAO '#13#10'        , n.NTC_OUTROS '#13#10'from NOTASPORCONTRATO n '#13 +
      #10'inner join  CONTRATOS c on c.CTR_ID = n.CTR_ID '#13#10'where NTC_IDCO' +
      'MPRA = :id'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 304
    Top = 432
    object s_ContratoVALOR_FRETE: TFloatField
      FieldName = 'VALOR_FRETE'
      ProviderFlags = []
    end
    object s_ContratoVALOR_COLHEITA: TFloatField
      FieldName = 'VALOR_COLHEITA'
      ProviderFlags = []
    end
    object s_ContratoVALOR_COMICAO: TFloatField
      FieldName = 'VALOR_COMICAO'
      ProviderFlags = []
    end
    object s_ContratoNTC_OUTROS: TFloatField
      FieldName = 'NTC_OUTROS'
      ProviderFlags = [pfInUpdate]
    end
  end
  object p_Contrato: TDataSetProvider
    DataSet = s_Contrato
    UpdateMode = upWhereKeyOnly
    Left = 344
    Top = 432
  end
  object ds_Contrato: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end>
    ProviderName = 'p_Contrato'
    Left = 384
    Top = 432
    object ds_ContratoVALOR_FRETE: TFloatField
      FieldName = 'VALOR_FRETE'
      ProviderFlags = []
    end
    object ds_ContratoVALOR_COLHEITA: TFloatField
      FieldName = 'VALOR_COLHEITA'
      ProviderFlags = []
    end
    object ds_ContratoVALOR_COMICAO: TFloatField
      FieldName = 'VALOR_COMICAO'
      ProviderFlags = []
    end
    object ds_ContratoNTC_OUTROS: TFloatField
      FieldName = 'NTC_OUTROS'
      ProviderFlags = [pfInUpdate]
    end
  end
  object buscaFor: TSQLDataSet
    CommandText = 'select CODFORNECEDOR from FORNECEDOR '#13#10'where CODTRANSP = :id'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 720
    Top = 56
    object buscaForCODFORNECEDOR: TIntegerField
      FieldName = 'CODFORNECEDOR'
      Required = True
    end
  end
  object pegaConta: TSQLDataSet
    CommandText = 
      'select CODIGO, CONTA, NOME, RATEIO, CODREDUZIDO from PLANO where' +
      ' CONTA = :PCONTARECEITA'#13#10'   and CONSOLIDA = '#39'S'#39
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'PCONTARECEITA'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 101
    Top = 424
    object pegaContaCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Required = True
    end
    object pegaContaCONTA: TStringField
      FieldName = 'CONTA'
      Required = True
      Size = 15
    end
    object pegaContaNOME: TStringField
      FieldName = 'NOME'
      Required = True
      Size = 200
    end
    object pegaContaRATEIO: TStringField
      FieldName = 'RATEIO'
      FixedChar = True
      Size = 1
    end
    object pegaContaCODREDUZIDO: TStringField
      FieldName = 'CODREDUZIDO'
      Size = 15
    end
  end
  object s_aplicaImposto: TSQLDataSet
    CommandText = 'select APLICAIMPOSTO from CONTRATOS '#13#10'where CTR_N_CONTRATO = :id'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'id'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 545
    Top = 149
    object s_aplicaImpostoAPLICAIMPOSTO: TStringField
      FieldName = 'APLICAIMPOSTO'
      FixedChar = True
      Size = 3
    end
  end
  object s_BuscaImposto: TSQLDataSet
    CommandText = 
      'select IMPOSTO from IMPOSTOCOLHEITA '#13#10'where VIGENTE = '#39'S'#39#13#10'  and' +
      ' FUNRURALFUNDECITROS = :vlr'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'vlr'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 473
    Top = 421
    object s_BuscaImpostoIMPOSTO: TFloatField
      FieldName = 'IMPOSTO'
      Required = True
    end
  end
  object s_serie: TSQLDataSet
    CommandText = 'select ULTIMO_NUMERO from SERIES '#13#10'where SERIE = :se'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'se'
        ParamType = ptInput
      end>
    SQLConnection = DM.sqlsisAdimin
    Left = 210
    Top = 421
    object s_serieULTIMO_NUMERO: TIntegerField
      FieldName = 'ULTIMO_NUMERO'
      Required = True
    end
  end
end
